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Se TABLE OF CONTENTS 

Er CONTENTS 

EE * ABSTRACT 

Ee 2. REQUIREMENTS 

5 2.1 EQUIPMENT 

72 2.2 STORAGE 

= 2.3 PRELIMINARY PROGRAMS 

“2 3. LOADING PROCEDURE 

73 4, STARTING PROCEDURE 

ac 4. CONTROL SWITCH SETTINGS 

5 4.2 STARTING ADDRESS 

3 4.3 PROGRAM AND/OR OPERATCR ACTION 

: c. OPERATING PROCEDURE 
5.1 OPERATIONAL SWITCH SETTINGS 
5.2 SUBROUTINE ABSTRACT 


o 


ERRORS 


f 0) Rr 
TUN Gate e000 “JOP ON EG) 


é 

é , RESTRICTIONS 

sé g. MISCELLANEOUS 

3 8.1 EXECUTION TIME 

166 g.2 STACK POINTES 

:22 2.2 POWER FAIL 

Ae 3. PROGRAM DESCRIPTION 
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238 ESERTPRION " 

eet 1. ABSTRACT 

iia PROGRAMS TEST THE FEL L MODES WITH FIYED NUMBER 
ae aaPPE RNS. chars, SHGULS BE'RUN SN Saoee ecb ar UEee> 
235 2 PASSES” wits "BLL SWITCHES OCWN. 

ick 2. REQUIPEMENTS 

ige 

iz] 2.1 EQUIPMENT 

183 POPLI/4S STANDARD COMPUTER WITH FELL OPTION 

1:5 

1ee 2.2 STORAGE 

tee PROGRAM STORAGE - THE ROUTINES USE MEMORY 2 - 17776 
56 

13) 2.3 PRELIMINARY PROGRAMS 

is NONE 

3 

i3s 

13 | 2. LOADING PROCEDURE 

7 | USE STANDARD PROCEDURE FOR ABS TAPES. 

ise 

tH! +. STARTING PROCEDURE 

:4¢ 

ia 4.1 CONTROL SWITCH SETTINGS 

14é SEE 5.1.1 (ALL DOWN FOR WORST CASE TESTING) 

ise 

148 . 4.2 STARTING ADDRESS 

15] THE PROGRAM SHOULD ALWAYS BE STARTED AT 200. 

it 4.2 PROGRAM AND/OR OPERATOR ACTION 

238 LOAD PROGRAM INTO MEMORY USING ABS LOADER. 

15 LOAD ADDRESS 200. 


‘ee 


ee ee eee 


Ea gh ie (SEE SEC 5.3.12) ALL DOWN FOR WORST CASE 
PRESS STAR 


THE PRoGRAn WILL LOOP AND BELL WILL RING ONCE EVERY PASS 
) A MINIMUM OF TWO PRSSES SHOULD ALWRYS SE RUN. 


ChCP CHF 
mere ual 


Pon £ lore 
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+0 +00 0 oe ewe 
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“yo 


D~) 


+ C.00O~ OP Gore 


2-20 <b 8b «pep ee 


. 
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Goru 


ROU Mari tet en tibet tt is 


2000 1.9 OO.0.00 


TTAVIAVIANIANI AL Re et ee ee eee eee ee 
are - O).000N) 


—~ 


Oo 


+ 
CO S20 OF 2 CMe OOD IO 


“» 


oh el el ee J 
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-o -b-404 
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RIPTION 


DESC 


uw 


wm 
-- 


an 
-- 


uwrowm 


m ru 


= 


mu 


mr 


DATA DISPLAY SWITCH TO THE DISPLAY POSITION. 
OPERATING PROCEDURE 


OPERATIONAL SWITCH SETTINGS 
T SA 200 .. ALL SWITCHES DOWN na WORST vy, TESTING. TF 
aN ERROR OCCURS, THAT TEST SE OPED UPON UNTIL 
SUBTEST IF OF ee COMBE CUTIVE Pr er WiTH NO ERRORS OF THE 
) . 


SUBTEST THE BELL WILL RING UPON 
COMPLETION OF A PASS. 


SWITCH SETTINGS ARE: ait 
SuciS> =] ..... HALT ON ERROR 
SwielH = 1.0... SCOPE LOOP 
SWc1g> = 1 ...... INHIBIT PRINTOUT 
SW«l2> 21 ..... INHIBIT TRACE TRAPPING 
SWill> = 1.0... INHIBIT ITERATIONS OF SUBTEST 
SUCI> @f cicos BELL ON ERROR 
a BELL ON PASS COMPLETE 
Sw) = 1... LOOP ON ER ROR 
Gwc08> =1..... LOOP ON TEST IN SW<7:0 
Rei TOAD SW<7:0> INTO us BEG ISTER 


SUBROUTINE ABSTRACT 
SCOPE 


THIS OUTIS ot IS PLACED 8 BeTWEEN EACH SueTcsT IN 

os My ION SECTI ECORDS THE STARTING aoDaEss. 
AS I Ye etn NG EN TERED IN LOCATION IF 

Cope” sup NAL inet 1 ay a SUBTEST MILE ee LOORE: 


UPON. 
CONTENTS MAY SE USED TO DETERMINE TREY, LAST euates? 
SORCESSPULLY con eNED. 


opnm 


“55 


HLT 
THIS Be PRINTS QUT_AN_ ERROR MESSAGE || 
UBTEST WILL 


I 
ZeNSECUTIVE boon’ PASSES ARE stat we iF S$ 
TO INHIBIT TYPEQUTS, PUT SW<13> ON A 
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DESCRIPTION 


Terror 


GOUT TUrurururory fie 
Ch > U1 £ Gstue- 09D 


$.2.3 TRTRAP 


TF SWil2> IS ON AO, THE T BIT WILL BE SET ON ALTERNATE 
PASSES. _ WHEN SET, IT CAUSES A TRAP AFTER EACH poet. 
bs | FIRST INSTRUCTION EXECUTED UPON TRAPPING IS AN " 
WHICH TURNS TO THE IN TERRUPTED SEQUENCE OF INS1 RUCTICNS. 
ae SEQUENCE IS CONTINUED UNTIL THE END OF THE PROGRAM iS 


ANS1-8 = ERROR DATA READ FROM THE FPil. FROM 0-8 OF T 
MAY BE TYPED DEPENDING ON thé NUMBER FOLLOWING 
HLT; I.£., HLT+3 WOULD TYPE ANSI-ANS3. 


HE Beh PILING TEST, LOOK AT THE LISTING AEOVE TH 


HESE 
THE 


aad 
e¢ 5.2.4 TRAPCATCHER 
236 a - +2" - “HALT” SEQUENCE IS REPEATED FROM 2 - 778 TO CATCH 
537 UNEXPECTED TRAPS. THUS any UNEXPECTED TRAPS Of 
ig INTESUPTS WILL HALT AT THE VECTOR + 2. 
240 | 
241 5.2.5 FLOATING POINT TRAP (TO 244) 
ee 
343 THE FP11 INTERRUPT DISABLE BIT IS ALWAYS SET IN ALL OF THESE 
244 TESTS (EXCEPT DCFP 8) SO NO TRAPS TO 244 SHOULD OCCLS. IF AN 
Sys INTERRUPT OCCURS, THE PROGRAM WILL HALT AT BE “tn! THE 
E46 ROUTINE CALLED FLTERR AND DISPLAY THE FPS REGISTER IN RO. 
eN/ 
B48 
E48 +. ERRORS 
g3¢ 
252 b.1 ERROR PRINTOUT 
€33 
ze THE FORMAT IS AS FOLLOWS: 

P| 

3 ADR FPS ANS! ANSE ANSZ ANSY ANSS ANSE ANS? ANSS 

E? FEC FEA 

és 

$3 : WHERE 

6] ADR ss BODRESS OF ERROR HLT 

g3 FPS = FLOATING POINT STATUS 

E FEC Oi FLOATING EXCEPTION CODES (ERROR CODES) 

6 FES — = FLOATING EXCEPTION ADDRESS (ERROR ADORESS) 

E 

4 


nw 
no 
i) 
a 5 

ivi 


norororororororororuroururururururur 


“NUNS 


MeO RCO NOP Or £2 G0) 


3-3-3 3-3-3 
o- 


“C00 WOUT EO + 


wmoqwa.oOcuna) 
COW IMU Gofue 


yer rontorrorys furururorororey 


- 


CUI GWIGIGIOITY) 
SAF et 30.9 
uf Goutue-Cc 


(WO) 
“ee (O00) 
4 O0ru)} CMOOD sy 


eer eer ae eer ery 


eu eUl eel euleuleulevieuieuleuleuicceueueucurn 


PATPTTETIATIATIAUT Ai eet det 
Chun Gunde Cho ort 
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.e ERROR RECCVERY 
RESTART AT 200 


“J 


RESTRICTIONS 
NONE 


8. MISCELLANEOUS 


8.1 EXECUTION TIME 
A BELL WILL RING WITHIN 15 SECONDS WITH ALL SWITCHES OOWN. 


8.2 STACK POINTER 
STACK IS INITALLY SET TO 600 


8.3 POWER FAIL 


EACH TEST CAN BE POWER FAILED WITH NO ERRORS EXCEPT ON THE 
FEC AND FER. 10 uRe. START THE TEST AS USUAL AND POWER OOkKN 
THEN UP AT ANY TIME.’ THE ;ROGRAM SHOULD TYPE “POWER” AND 
CONTINUE TO RUN WITH NO OTHER TYPEOUTS. 


$. PROGRAM DESCRIPTION 


THESE PROGRAMS TEST ALL THE ae Oates Fe THE FP11 IN A 
MODES. __ EACH PROGRAM HAS MANY SUBTESTS (THE CODE BETWEEN 
ore STATEMENTS) WHICH ARE RUN 2S& TIMES BEFORE CONTINUIN 

THE NEXT. SW<11> ON A 1 CAUSES EACH SUBTEST TO BE RUN 
ONL Y ONCE. SW<9> ON A 1 ENABLES LOOP ON ERROR. THE ADDRESS 
ICNT (LOC 1000) AND DISPLAY REGISTER ON THE 11/45 EACH 
CONTAIN TH THE ITERATION COUNT TH THE LEFT BYTE AND THE TEST 


BER IN _ THE Y ALL THE SUBTESTS SHOULD BE an 
SEGUENTIALLY BY STARTING AT C NOT BY STARTING AT THE 
BEGINNING OF THE SUBTES 

-_ THI 
en Tt, SW<8> IS PUT ON A O OR THE RIGHT BYTE IS CHANGED. 


TEST IS NON-EXISTANT, THE PROGRAM WILL BE RUN AS 
ae 


IND sji-DoFPI-8 TEST OF _LOCOF FD, STCFO, STCDOF MACYI1 27(732) 17-SEP-76 10:46 PAGE ® 
aRaMRE ES Sut TCH Rate BNS ie Peake tts ; : 


- TITLE MAINOEC-11-DCFPI-B TEST OF LOCOF, LOCFD, STCFD, STCCF 
;COPYRIGHT 1972, DIGITAL EQUIPMENT CORP., MAYNARD, MASS 
3 PROGRAM BY KEN’ CHAPMAN 


SWITCH USE 
: CO - LOAD UB REGISTER WITH SW<7:0> 
1 = LOOP ON TEST IN Sid(7:0> 
5 LOOP ON ERR 
10 O'- BELL ON PASS COMPLETE 
1 - BELL ON ERROR 
il INHIBIT: ITERATIONS 
12 INHIBIT TRACE TRA 
13 INHIBIT ERROR TYPEOUTS 
14 LOOP ON TEST 
15 HALT ON ERRO 


OUTPUT FORM: 
ADR__FPS ANSI] ANS2 ANSS ANS ANSS ANS6 ANS7 ANSE 
FEC FEA 


FPS FEC 

BIT REASON CODE ERROR 

0 CARRY 0 ADDRESS ERROR 

1 OVERFLOW e OPCODE ERROR 

e R 4 DIVIDE BY ZERO 

3 NEGATIVE 6 CONVERSION ERROR 
4 oad a a fa gan” MODE 1g OVERF LOH 

5 TRUNCAT, le UNDERFL OW 

& LONG INTEGER MODE 14 UNDEF INeD VARIABLE < 
? DOUBLE PRECISION MODE ET) UBREAK TRAP 

8 INTERUPT ON ero ERROR 

3 NTERUPT ON OVERF Gt 

10 INTERUPT ON UNDERF 

tS INTERUPT UN UNDEFINED VARTASLE 

13 

14 IN Maal DISABLE 

15 ERROR FLAGs 


-”-. 


ww / 
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DCFPT.PL) MACRO'S AND ASSIGNMENTS 


-ENABL ABS 
o9o00) gee wt 
(fé¢ = ( 
tooe58 SWR= 15505 
177S70 DISPLAY=SWR 
104400 SCOPE= TRAP 
104900 HLT= EMT 
coo4 TYPE= i! T 
: ? g LL= 7 
= 40 
009008 RO= “0 
900001 Rl= “1 
Ce Re= “2 
009003 R3= %3 
000004 R4= “4 
O09005 RS= “5 
Ooco0S TTY= “5 
O06 SP= “6 
000007 PC= 47 
000000 Aco= “0 
000001 ACIl= “1 

0002 ACe= 4 
090003 AC2= % 

0004 ACH= “4 
ooo005 aAcs= %, 
100909 SWiS= 100000 
Bie 1: 
cee se ae 

4090 Wil= 
002090 SW10= 2000 
Rau a 1005 
reste Paues 170063 
170005 STag= 170005 
170007 STg0= 170067 
170006 MRS= 170006 
170004 Losc= 176004 
090008 2 0 : TRAP CATCHER FROM 0 - 776 
coce0d 2 209 

Occ200 O001&7 oc0b22 IMP BEG 
006760 eS 760 

ce0769 170200 FLTERR: STFPS FPS 

C3C762 170367 OO0034 STST FEC 

Cos7ée 900000 HALT 


Boo778 ooooe RTI 
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B00 
—r- 
ood 
ts 


Od0OO00O 


[anton] oe) 
Stetatat=: 


oO £ruO 2 


ee 
+ b+ b+ b= bb bh OO 
Jann s soeyeE esse 


sis{ststslatatat=lsl=lstsi={=] 


SETUP AND ANSWER AREA 


Oo 
oOo 
Oo 





l 
ICNT: 0 : ITERATION COUN NT - LH TEST NO. - RH 
ANSI: 0 FIRST ANSWER (SEE CODE) 
ANSe: QO 
ANS3: 0 
ANS4Y: 
ANSS: 
ANSE: 0 
ANS7?: 0 
ANSS: OQ 
FEC: sFLOATING EXCEPTION CODES 
FEA: 0 “FLOATING EXECPTION ADDRESS 
012706 000600 BEG: MOV #600, SP :#% STACK AT 600 * 
012737 001054 900004 MOV #M1i20,a84 :FIND OUT HhIch MACHINE THIS 1S 
005737 177772 TST a#l77772 :1S PIRQ T 
012767 OOCO0& o15144 MOV #6, YESRT FUDGE IN RTT IF LI74S 
000402 eR BEGIN 
016737 016300 OOOC:O M1120: MOV FPTADR, 2810 sLOAD THE ILLEGAL INSTRUCTION VECTOR 
: WITH THE ADDRESS OF THE F 
: the Fru WILL HANOLE THE BAD OPCODES 
012737 OO000& OO0004 BEGIN: MOV ub an RESET 
012706 O00600 MOV 
012737 016216 000014 MOV Mii 2814 :SET TRACE TRAP VECTOR 
012777 017056 016256 MOV SPOWDWN, JOWNVEC 
012777 O00340 O1b2Se2 HOV #340 Wena 
012737 017256 o00028 MOV #. 10T, a820 :SET UP VECTOR 20 
012700 000020 MOV #30,R0 :SET RO TO VECTOR 30 
012720 G1i6360 MOV #. TRP. (0)+ :SET EMT VECTOR 
812720 O00340 MOV #340, [0)+ 
012720 016220 MOV sent (0)+ ;SET TRAP VECTOR 
012710 00340 MOV 0) 
012777 OO0760 o16204 MOV Se TERR OFPVECT ;LOAD INTERUPT VECTOR 
912777 000340 O16200 MCV #340, OFPVECT+2 LOCK UP PROCESSOR 
605067 177610 CLR ICN 
905067 016206 SLR int 


oe 


DCFP 


001220 
001222 


O012e4 
001232 


Bole 
001274 
001302 
001304 


001306 
001310 
O0i31e2 
001320 


001322 


001342 


wr 


104002 


104400 
O00404 


052525 
052525 


170127 
1 7 


104000 
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TEST SECTION 


021347 


090209 
177760 


oo000d 


O47+117 
177760 


047404 


177520 
000000 


oococo 


0S2S25 


‘047417 


1777€0 
047400 


076721 


oo000t 


177512 


177502 


052525 


BR TSTO “SKIP “GARBAGE” DATA 
DATO: 142356,021347,076721, 136514 


TSTO: LOFPS #000200 ;SET D ONLY 
LOD DATO, Aco ; LOAD “GARBAGE” INTO ACO 
STD Aco, ACY :STORE THE “GARBAGE” IN AC4 


5 ELEREEAARERE RARER EER EERE EEE EERE EEE EEE EEE EEE EEE EER EEE TEE ESSE EES 
:TEST 1: TEST LDCOF (LOAD-CONVERT DOUBLE TO FLOATING) 

; $pe0 owete” ae ge mm x --) 000000, 000000 
 pasnansvscnsasescuabacsnscessssanshensessanersessnenesrasssessesesssnee 


SCOPE 
BR TST1 


DAT1: 000000, 000000, 000000, 000009 


TST1: LOFPS #047417 ;40AD FLOATING POINT STAUS 
FPI1: LDCOF ODATI, AC3 AOE FLOATING P 000000 Coon 000600 , dco00c 


STFPS FPS ATING POINT STATUS 
CMP #047404, FPS 5 CHECK gFLOATING POINT STATUE 
BEQ +4 : BEEN F OK 

HLT PS Sor FF UAL TO 047404 


STF Ac3 ANS! § ;STORE AC3 IN ANSI, ANS2 
CMP #000000, ANS! :D1D Oo0800 GET STORED? 


BEQ , ;BRA 

HLT+2 ;ANS1 NOT EQUAL To 000000 

CMP #000000, ANS2 ;D1D re a eer STORED? 

BEG +4 : BRANCH 

HLT+2 s ANS2 NOT EQUAL TO 00900 
j ERE EEE E EER LEER EERE EEE EERE EEE EER HR ER ER EERE EEE 
: TEST 2: TEST LDOCOF {LOAD-CONVERT DOUBLE TO FLOATING) 
ll beers, Usenes. MEeRS /SbaEES oe ,OS2SeS 
 snannnnsnbocecanneehseusesesvsneusbansussecesssonssnseeeseanensonesness 

SCOPE 

BR TsTe 


DATe:  O05eS5eS,0SeSeS, 052525, 052525 


TST2: LOFPS #0474i7 ;LOAD FLOATING POINT STAUS 


FPIe: LOCDF DAT2, ACL ; LOAD-CONVERT 052525 ose5e5 052525, 052525 
STFPS FPS :STORE FLOATING POINT STATUS 
CMP #047400, FPS > CHECK JFLORTING POINT STATE 
BEG +4 ‘BRANCH IF OK 
HLT :FPS NOT EQUAL TO O47HCS 


ee se ee ee 


Bie eh ‘whashite 


DCFPI.P 


001344 
00 


O0i37e 


001374 
001376 


001400 
001406 


901410 


001450 
OC14S6 
001466 


001462 
002484 


174167 
Ce 

001401 
104002 
02°767 


001401 
194002 


104400 
000404 


leSeSe 
1eSeSe 


170127 


022767 
001401 
104002 


104400 
000404 
000200 
000000 
170127 


001401 


l2eS25e 
047417 
177760 
047410 


177344 
leSeSe 


125253 


c00090 


047417 
177760 


047400 


—T- 
3c) 
ole) 
zo 


125252 


177336 


177326 


000000 
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STF ACI ANS! STORE _ACL_IN ANSI, ANS2 
CMP H0SeS25, ANS!  :DID OS2S25 GET STORED 
BEQ ‘BRANCH IF OK 
HLT+2 ANSI NOT EQUAL TO OS2S25 
CMP #0S2525,ANS2  ;DID 052525 GET STORED? 
BEQ +4 : BRANC 
HLT+2 “ANS2 NOT EQUAL TO OS2S25 
5 REKEAERERERAES LE RAE ALLELE RL EREL EERE E ER REEEE REL LLL EERE LEAL LLL EL SELES ELS 
TEST 3: TEST LDCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
: LOAD lebese, 125252, 125252, 126252 --> 125252, 125253 
: FPS = 047410, ' SRC = Mb-R7 Ac = 
Heeeeeseeenananesepeeneneseanenesbos9 seveenese sna eeaseseas Eeeteat Oe 
SCOPE 
BR TST3 


DAT3: 125252, 1eS2Se, 1eSeSe, 1eSeS2 


;LOAD FLOATING POINT STA 


TST3: LOFPS #047417 US 
;LOAD-CONVERT 125252 teat leS2Se, 125252 


FPI3: LDCDF DAT3, AC3 


STFPS FPS : STORE FLOATING POINT STATUS 
CMP #047410, FPS : CHECK K FL OATING POINT a rATHe 
BEG +4 ‘BRANCH IF Ok 
HLT >FPS NOT EQUAL TO 047410 
STF ac3 ANS! § ;STORE AC3 IN. ANS! ANS2 
CMP #125252,ANS1  :DID 125252 GET STORED? 
BEG +4 :BRANCH I a 
HLT+2 :ANS! NOT EQUAL TO 125252 
CMP #125253,ANS2  § ;919 125253 GET STORED? 
BEG +4 BRANCH IF OK 
HLT+2 :ANS2 NOT EQUAL TO 125253 
eT de TEST LDCUF (LOM -COMMERT DORE TO FLOATING) 
TEST 4: TEST LDCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
; LOAD _ 000200, 000000, g00000, 000000 --» 000200, 000000 
FPS = 047400, ’ SRC = Mb-R AC = AC 
| snusuuasopasnnsonithonosecocantesolaseueceousssceseasessueuosonsnssennt 
SCOPE 
BR TST4 


DAT4¥: 000200,000000,000000, 000000 


TST4: LDOFPS #047417 ;LOAD FLOATING POINT STAUS 
FPI4: LOCDF DATY, ACO ; LORD-CONVERT 000200, 000090 , 900000, Sco000 


STFPS FPS :STORE FLOATING POINT STATUS 
CMP #047409, FPS : CHECK FLOATING POINT STATUS 
BEG +4 :BRANCH IF OK 


ee ee a ee re ae ne eee nee ees ee = = eee ee me ws 


001536 
00iS44 
001S46 


601550 
0015Se 


GO1Ss4 
001562 


031S76 
001602 
001604 
061606 


00161e 
09:620 
001622 


Oooo 
Oooo 
ei 
oo 

QO) 

eo i) 


201636 
SE1g40 


wee 
mmr 


104002 


022767 
001401 
104902 


022767 
001401 
104002 


194400 
OG0404 
990177 
177777 


19m: 959 
of oie? 


SensaaAr 


000880 


G20000 


oo0000 
47417 
177760 
ou74is 


177170 
100200 


ococco 


177777 


047417 
1997 > 
eo! 7760 


177250 


177240 


000090 


177162 


177152 


LOCFD, STCFD, STCOF 
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HLT :FPS NOT EQUAL TO 047400 
TF ACO. . ANSI T IN ANSI, ANS2 

chp aogt200, AN BL B boasto Ge BNE sees 

HLT+2 ANS] Nor EQUAL TO 000200 

CMP #000000,ANS2 § ;DID OO0000 GET STORED? 

BEQ +4 “BRANCH IF OK 

HLT+2 :ANS2 NOT EaUAL TO oooo0e 
ee eee eae cc ate eons mane Ee de datoae 
TEST S: TEST LOCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
: LOAD iba200- 600000, 0 00,00 0990 _ =--) (90200, 000000 
: FPS = 047419, ' SRC C 


 snncensansenssrsssnhusnanseseesonssensonsenesssssassesseussuecoecussess 
COPE 
R TSTs 

DATS:  i100200,0900C9, 000000, GtOocd 


;LOAD FLOATING POINT STAUS 
:LOAD-CONVERT 100290 000900, coccoa, soco0e 


TSTS: LOFPS #047417 
FPIS: Lee DATS, Ace 


TFPS FPS *STORE FLOATING POINT STATUS 
CMP #047416, FPS :CHECK FLOATING POINT STATUS 
BEQ +4 ? BRANCH 
HLT FPS NOT EQUAL TO S474:0 
ST ANS!  ;STORE AC2 IN ANS!, ANS2 
CMP aiGh200, ANS1 ‘DID 100200 GET STORED? 

BEG "BRANCH IF OK 

HLT+2 SANS NOT EQUAL TO 100200 
CMP 8O00000,ANS2 =; DID gonnnd GET STORED? 
BEQ +4 * BRANCH 


F OK 
HLT+2 ;ANS2 NOT EQUAL TO COCOO0 


5 EERE EME EERE EE EEE EEE EAE EEE R ERE EE REE EE LEE EEE EERE RE EEE EER ES SALT E EEE 
: TEST 6: TEST _LOCOF CLOAD-CONVERT DOUBLE TO FLOATING) 
; LOAD — 000177,177777,177777,177777 --> GO0000,000000 

FPS = O47404, SRC = HEAR? AC = ACO 
eT AT RR Se 


SCOPE 
BR TST6 


DAT6&:  O000177,177777,177777 177777 
TSTé: LDOFPS #047417 sLORD FLOATING POINT STaUS 


FPI6: LOCDF DATE, ACO LOAD-CONVERT DOGI77,i77777, 177777, LPP ere 
STFPS FPS STORE FLOATING PoINt status 


en 


—~s =e 


o-be 
“Jy 
tu 
+ 


ses 8 


8 BBBBBBRS BEB BS 


atate, 


Bf 
Rois Rel Weeds 


022767 
e140} 
TOscte 


s9e7AR5 
e. 6a 
ARAAAA 
weertws 


a-==-<5 
ewww 


000089 
W707? 


047417 
177754 
177754 


177634 
147414 


Ant: 
000034 


RmAnaanr 
et et re 


vFD, 

cMP | aONTHDN, FPS 

BE ws 

HL 

STF aT ANS. 

nas BOCLOOS , ANS} 
. ot 

aLTee 

gmp #090000, ANSE 
- 

HLT +2 


TEST _LOCDF 


** ogo Nateea 172777, 


FPS = 147414, ° SRC 


pot Os ng en Re et are 


SCOPE 
F 1ST? 

09909, 069909 
100177177777 .177777,177 
LDFPS #047417 

LOF SET?, Ac 
cocor § BaT7? acs 
STFPS FPS 

STS? FEC 

CMP BL47414, FPS 
BEG +4 

HLT 

CMP #i4, FEC 
259 +4 

HLT 

CMP er7, FEA 
£0 

HLT 

ST acc ANS! 
eM 80cd000, ANS} 
£9 +4 

HiLTee2 

cmp 8000000, AaNs2 

SEG +4 

HLT+2 


STCOF MPACYI) 271732) i7-SEP-76 10:46 


souk FLOATING BOINT S76 


BACH 
[FPS NOT EQUAL TO O474O4 


OI ‘EID Sootte ce* Steen 


:BRANCH | 


SANS | Not "ota TO 900CCE 


3015 OGO0O0 GET STORED” 
: BRANCH IF OK 


ANS2 NOT EQUAL TO OOCOCC 


+ yy intent 99 gly +++ are fale lett mete ae tt Ag Otte erect 


-CON QNVERT DOUBLE 7 12 F ORTING) 


' = we 


ase 


(t?é 


;LOAD FLOATING POINT STAUS 


if NTO a, 


-¢ 160177 
: STORE FLOATING BArNt sTaTué 


Esa eg 177777 ==» 300000, 050000 
AC = ACO 


HECK Foon TING POINT STATUS 


RANCH IF OK 
:FPS NOT EQUAL TO 147414 
; CHECK so he EXCEPTIO 
; BRANCH 
:FEC NOT EQUAL TO 14 


eK at ie EXCEPTION 


:FEA NOT EQUAL TO FPIT 


:STORE ACO IN ANS!, ANS2 
:015 coodde GET STdreD? 


oa Not ESURL TO O000S8 


O10 QOOCCC GET STORED” 
BRANCH ey Ok 
smNSe NOT EQUAL TO DOCOCC 


rPAre 
wwe 


SFPFSOFSFEESESSESDESEFSSSSSSSSFESSPRESSPESSESESESERESP SSDS ESE SE SELES TEES 


AINDES*21 


et) 
. os wey 


ncepe +e 
-s /_ @e) @6@ 


330 
fororu 


38 
foron 


Ber 
ror TONWMUER- oe 0-0 
he 


CIS 
o 


rue 
tmMse To 


a ee on 


“FETA5 


104400 
000404 


149000 
O06000 
170127 
1777 


saith 


104 ‘OCe 


003000 
047417 

77760 
047400 


17S865 
040200 


RARAAA 
Buwude 


008006 


047417 
17770 


O474105 


176600 
199000 


weww 


arareAa: 
ewww we 


> A ae | 


000300 


176660 


176650 
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: TEST 10: TEST LOCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
; LORD BupGO0, OgpR00, , 000 opg0, —. --) 040000, 000000 
FPS = 0474 Mb- ACe 
t ennnennnanesobeacesinnnretasscsansbantensnnnersesensesensanvansenesetre 


SCOPE 
BR TST10 


DRTIC: 040000,000000, 000000, o009C0 


TSTI1O: LDEPS 8047417 sLOAD FLOATING POINT STEUS r 
FPI10: LOCDF ATIO, Ace i LOAD-CONVE T o4ocoo 6o,c0c005, cescas 

STFPS FPS :STORE FLOATING POINT Boe d 

MP 8047400, FPS : HECK FRORTING POINT STATUS 

BEQ +4 :BRANCH IF Ok 

HLT :FPS NOT EQUAL TO 047400 

STF Ace ANS! — ; STORE AC2 IN ANSI, ANSZ 

CMP #990000, ANE :DI0 Quoob0 Ge T STdRED 

BE : BRANCH IF 

HL T+2 ANS1 NOT EQUAL TO o¥occo 

oMP 8000009,aNS2  ;DID go09g0 GET STORED? 

BEG +4 > BRANCH IF 

HL 742 :ANS2 NOT EQUAL To ooc9c0 


| Seegesentensenneneseosesosnnsesenronsnsepeosesonsoensensonsnqnencnnnses 
: TEST li: TEST LDCOF (LOAD-CONVERT DOUBLE TO FLOATING) 
: LOAD isep00, 000009, 100000,000000 --> 140000,00000: 
: FPS = 047410 SRC = M&-R7 AC = AC3 

| senuseanslanshancttbanskatansstosnkvemnplonstlesmansieheensmanstenen 


SCOPE 
BR TST1i 


OATii: 140000,000000, 100000, C6000 


TSTil: LOFPS #047417 sLOAD FLOATING POINT STAUS ‘ 
Felli: LCOCDF DATL1. aca Eee PET nd 140000 C9000, 190000, acees3 

STFPS = FPS ORE FLOAT OINt § 

tmp 8047410, FPS : CHECK _FLORTING POINT STATUS 

BEG +4 : BRAN HIF Ok 

HLT :FPS NOT EQUAL TO O47410 

STF ac3 ANS!  ;STORE AC3 IN NS ANS2 

cup en ssoce ,ANE! 70 14 140900 GE STORED? 

a : 

HLT +2 : ANS! not EGuAL TO 140029 

CMP 9000001, ANS oo 7 STORED? 

Be tié«iwso i é ae ae “ 

"6. ee ANS?2 NOT ESUAL 76 co9cs) 
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atk TEST SECTION 
TEST Tar TEST COcbe CLORD-COWVERT QOUBLE TO FLOATING) 
i TEST le: Test Prt. ATT? UBLE TO FLOATING) 
3 LORD oy Mie 44 oa 177777 177777 
PO A 
OSeee6 14400 SCOPE 
OS223sS O0O0404 BR TSTl2 


002232 177777 «P7777 OF7T77 DATI2: «177777, 177777 077777, 177777 
002240 177777 


oo2242 170127 o47417 TSTl2: LOFPS #047417 ;LOAD FLOATING POINT STAUS 
O92246 177567 177760 FPrid: LOCDF BAT:2, ACL SLOAD-CONVERT 177777,177777 077777, 177777 
992252 170200 STEPS FPS : STORE FLOATING potnt Psretus 
552254 Oe2e700 o47410 CMP #047410,F°S : CHECK si QAT TING POINT SvaTLS 
802260 001401 SEQ +4 :BRANCH IF OK 
dd2262 104000 HLT :FPS NOT EQUAL TO 047410 
O02264 174167 176512 STF RCL, «ANS: «=; STORE AL IN ANS! ange 
502270 O2e7e? iv?rre lreso4 Mp #17>777,ANS! § :DID 177777 GET STORE 
502276 00:40 BEQ +4 : BRANCH iF 
o02300 id4ode HLT +2 ANSI NO EQUAL TO 177777 
D02302 Oe2767 177777 178474 ome 8177777 ,ANS2 :DIQ 177777 GET STORED” 
992310 99140) SEG +4 :BRANCH IF 
902312 154092 HL T+2 :ANS2 NOT EQUAL TO 177777 
s SSPEFFSESLSLELLFAFEFLFLALRSLELLLSFLALSTLELELELASFSRELLFALASFSTPEASPAAASS 
:TEST 12: TEST LOCOF (LOAD=CONVERT DOUBLE TQ FLOATING) 
: "0 AD 177777, 177777, 177777, l?7777 --> Lococo, coocse 
; Ss: 16, Pex: s 1. mye AC = AC! 
 sannosecs toned sbocosenectanebanenteensesnenenensnediipenconesseanuoense 
002314 104400 SCOPE 
Sde2ie oCo4o4 BR TST13 
092320 41977777 «4177777 «177777 CAT13: 177777177777, 177777 177777 
Oc2226 177777 
002330 170127 047417 TST23: LDEPS #8047417 sLOAD FLOATING POINT STAUS 
002324 177567 177760 FPI113: LOCOF OATI3, ACL sLOAD-CONVERT 177777 L777? T tren Litre 
002340 170200 STFPS FPS 'STORE FLOATING POINT statue 
Sdes42 170367 176454 StST FEC ;STORE EXCEPTION CODES 
Sces46 022700 14741é Mp 847416, FPS : CHECK OAT ING POINT STATUS 
Sce252 001401 BEG +4 “BRANCH IF OK 
502354 104000 HLT :FPS NOT EQUAL TO LHT4IS 
052356 22767 SO0010 176436 CMP 810, FEC :CHECK Fi QATING EXCEPTION CODE 
Boe3e4 D014) BEG +4 : BRANCH 
Beste. josods HLT “FEC NOT EQUAL TO } 
302272 «DEE7E? «LLE2EH «1 TEHEE -  oMp aFPIl3, FES sCHECK FLOATING EXCEPTION ACDSESS 
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ocFeT. Pi TEST SECTION 
90237 001401 EQ #4 ;BRANCH_IF 
BSs400 104000 HLT FEA NOT EOUAL TO FPIL3 
D02402 174167 178374 TF ACL, _-ANSL =; STORE_ACJ_IN ANS. ANS2 
RSE deere 168660 1reake Pep #100000, ANEL i 1B oBS0 te Pet oneDs 
555414 001401 BEQ +4 
SoS4ie 104c02 HLT#2 ANE] NOT EouAL TO 1000C0 
O52420 02277 00000 176356 cmp a000000,ANS2 ID 900000 GET STORED” 
S545 06140; BEQ #4 : BRA 
BE430 154008 HLT +2 TANSe NOT EQUAL TO oODCd0 


anna a gry eg Eg Fo epiaeaten inte 
TEST 14: TEST _LOCOF (LOAO-C ent QUBLE TO FRSATING) 
: LOAD Ricca 1272777, 177777, 177777 ~=» 000000, 000C0C 

FPS = 147406, SAC = Heh, AC = AC3 


FEC = 10. FEA = 

= SEEESERERESESESSEREESESES ES ESEEESSSSSESEAED ER ESESESESESSSSSESESESEESESS 
o02432 104400 SCOPE 
002434 doco4o4 Ee TST14 
002436 O77777 77777 177777) =DRTI4: 9077777 ,177777 177777 177777 
002444 177777 
oc2445 170127 o47417 TST:4: LDFPS 8047417 ;LOAD FLOATING POINT STAUS - 
00452 177767 177760 FPIi4: LOCDF DAT!4, Aca SLOAD<CONVERT O77777 177777 LTP r er, Lotte 
O02456 179200 STFPS = FPS :STORE FLOATING POINT STATUS 
Oce4b0 170367 176336 Stst FEC :STORE EXCEPTION CODES 
005464 022700 147406 CMP Bl47406, FPS :CHECK FLOATING POINT STATUS 
002470 O01401 BEQ +4 :BRANCH IF Ok 
o52472 104000 HLT FPS NOT EQUAL TO L474O6 
O02474 022767 COO0lO 176320 cM aid, FEC : CHECK APLGATING EXCEPTION CODE 
62502 001401 hae +4 : BRAN 
52504 104006 HLT Fe NOT EQUAL TO 1 
002506 022767 O0e4s2 176210 oMP FPII4, FER ;CHECK FLOATING EXCEPTION AODRESS 
902514 901401 BEG +4 BRANCH IF Ok 
062516 104006 HLT :FEA NOT EQUAL TO FPILY 
002520 174367 176256 ST Ac3 ANS!  ;STORE AC3 IN ANSI, ANS2 
602524 022767 O00000 176250 CMP soohooo,ANS!  § ;DI0 900990 GET STORED? 
002532 901401 BE9 +4 BRANCH IF OK 
02534 ose HLT +2 :ANS1 NOT EQUAL TO oo000e 
002526 022767 OOOCOD 176240 ome sOO0000,ANS2 =; DID 900090 GET STORED? 
Scee44 001401 BEG +4 BRANCH IF OK 
SSes4e 104052 HLT+2 SENS No? EduAL TO ooCO00 


jSESAOSROEOHESORER EOL OLERDERLEREROSEREEDREAREREEEERD ERE AEEEHEE HELE see 
TEST 1S: TEST LOCOF (LOAD-CONVERT DOUBLE he FLOATING) 
; poe ee ordese, teaese. leseSe, Le5eSe “=> O802S2, 125252 


4 60, ‘ v . AC = ac 


MALNOES@L-OCFPI-8 


DCFPT . 


dtee42 


COeE4+4 
O02646 


002655 
002655 


te lel 


104400 
oco404 


0402Se 
l2eSeS2 


022767 
GO14O1 
104902 


104400 
000404 


140125 
OS2S25 


170127 
C1e70i 


1onehh 
1702 

022700 
001401 
104000 


174367 
022701 
000401 
104C00 


2 Bot48: 


rawore 


TEST OF as LOCFD, STCFO, STCOF 
TEST SECTION 


i2S2S2 


047417 


7775 


047400 


176162 
C402Se2 


0S2Se25 


047417 
002650 


047415 


176072 
OCetSo 


140125 


MACY11 27(732) 
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5 SRERAALARASAARALARSHFLE LASSE LE RSASL ES ESLSS ASL FL FFA SFESFLISSSLLFFEASFFSSS 


SCOPE 
BR 
125252 DATIS: 


TST1S: LOFPS 


176154 


176144 CMP 


TST1S 


8047417 
DATIS, ACe 
ACE, ACI 
) 


FE 
8047400 , FPS 
+4 


AC1 


8125253, ANS2 
+4 


ANSI 
eoybese, NS! 


O402Se, 1eSeS2, 1eS25e, leSeS2 


;LOAD FLOATING POINT STAUS 


. GRe FUORI pare AE 125252, 125282 
iCHECK FLOATING POINT STATUS 


IF OK 
FPS NOT EQUAL TO 047400 


:STORE ACI IN ANS1, ANS2 
2 GET STORED? 


K 
TANS] NOT EQUAL TO O4CeS2 
;D1D 125eS3 GET STORED” 


BRANCH IF _Ok 
ANS2 NOT EQUAL TO 125253 


iyecT lke TEST LOCOP (LOAD-CONVERT DOUBLE TO FLOATING) 


4 TEST 
; 5 opp 
FP 


TEST 


S = 047410 
NE LE RM I" ee 


SCOPE 
BR 


052525 DATIE: 


TSTI&: 


TST16 


e047417 
#DAT16, Rl 
AC3 


( he 


F 
8047410, FPS 
+4 


ANS] 
Z wate, Ri 


8140.25, ANS! 
+4 


LOCOF (LOAD-CONVERT DOUBLE TO FLOATING) 
183128. "Seeses, eat” »USERES iy 146125, 052525 


146125, 052525, 052525, 052525 


;LOAD FLOATING POINT STRAUS 


sLOAD-CONVERT 140125, 052525, 952525, 
:STORE FLOATING POINT STAT a 
:CHECK FLOATING POINT STATUS 


; BRANCH 


IF OK 
;FPS NOT EQUAL TO O47410 
s STORE KAI IN ANSI, ANS2 


SRENCH IF 
:R1 NOT EouaL TC sDATLs 


aT 1iotes 6 GET STORED” 
pANS1 NOT Fa UAL TO 240125 
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002732 Of27E7 oS2525 176044 CMP #052525 , ANS2 015 ioe ses GET STORED? 
O5s74o 00149} BEQ 44 H iF 0 
Jer4e 104c0e HLT+2 BAe NO EQUAL TO OS2525 
5 EARARA FLA RAALAAAARAARAAASSRALLARAARELAESLASAARALALALELERS LAL FAA LSFL FSS SS 
:TEST 17: TEST LOCDF (LOAD-CONVERT DOUBLE TO FLOATING: 
; LORD _ oi26, dseses, 052528, 0825s ==) 040125, 052525 
I EK gE RA, LS A Seo 
o02744 104400 SCOPE 
58e74, oo0404 BR TST17 
092756 o4gleS oS2s25 os2s25 DATI7: 040125, 052525, 052525, os2s25 
092756 O52e525 
092760 170127 O47417 TSTi7: LDFPS #047417 sLOAD FLOATING POINT STAUS 
092764 012705 902750 MOV #OAT17, RS 
002770 177525 LOCDF (RS)+," ACL :08D- -CONVERT g4g126 os25e5 os2525, 252522 
002772 170200 STFPS FPS :STORE FLOATING POINT STATUS 
002774 O2e700 o47400 CMP #047406, FPS ; CHECK FLOATING POINT STATUS 
093000 601401 SEG +4 NCH IF OK 
104090 HiT ‘EPS NOT EQUAL 70 047400 
903004 174167 17577 ST AC! ANSI ;STORE ACI IN ANSI, ANS2 
902010 Oe2e70S oc2768 emp a7sti7, ze : CHECK 5» 
093014 901401 BEG +4 : BRANCH 
0630:6 104099 HLT :RS NOT Fuel TO #TST17 
002020 022767 o40125 175754 CMP #040125, ANS! :DID 040125 GET STORED? 
003526 001401 REQ +4 : BRANCH 
093030 104002 HL T+2 :ANSL NOT EQUAL TO O40125 
002032 g22767 os2s25 175744 CMP 8052525, ANS2 :DID oS2525 ceT STORED? 
993945 601401 BES +4 “BRANCH IF 
moso42 194002 HL T+2 :ANS2 NOT FOUAL TO oS2525 
reer op, TEGT LDCDF (LOAD-CONVERT DOUBLE TO FLOATING. 
: TEST 20: DCOF_(LOAD-CONVERT DOUBLE TO FLOATING) 
LOR _ htGR lesese, Lesese, 1eS25e - =. 140252, 125253 
Piet TR nt IN pa EEL, SEMEL rts 
902044 104400 SCOPE 
652546 ooo46s BR TS720 


CO30S9 140eSe leSeSe 25252 DAT2O: i40eS2, leSeSe, le5eS2, 125252 
OO30SE lesese 


953060 odocud saved: 

poso6e 470ie7 047417 TST20: LOFPS sQ47417 ORD FLOATING POINT STRAUS 
wezcee «O15667 17775 Atv xo, saved SAVE 7 POINTES 
202072 Ole74e oo205° MOV eOAT20, -(%6) PUT spate, ON THE STs: 


MBINDEC<11-DCFPI-8 TEST OF LOCOF, LOCFD, STCFD, STCOF MACYI11 27(732) 17-SEP-76 10:46 PAGE 20 
OCFPT.B1i TEST SECTION 


003076 177636 LOCDF a(ub)+, Ace sLOAD-CONVERT 140252 1252se LeS2t2, 12S252 
003109 170e00 STFPS FPS : STORE FLOATING POINT STATUS 
03102 O20667 177752 CMP “— SAV20  :CHECK THE STACK Ce NTER’ 
93106 001405 _ BEQ  TSA20 BRANCH TF OK 
553110 O10667 1756be MOY “6 ANS! SAVE WRONG “6 FOR TYPING 
503114 O1870& 177740 MOV sav20, %b ‘RESTORE STACK POINTER 
903120 104001 HLT+1 : STACK POINTER FOULED UP, NOT S007 
093122 o20027 O47410 TSA2G: CMP FPS, #047410 ;CHECK FLOATING POINT STATUS 
5031e6 001401 BEG +4 : K 
063130 104006 HLT :FLOATING POINT STATUS NOT 04740 
003132 174267 175644 , STF ace ANS!  ;STORE AC2 IN. avs ANSe 
03136 022767 1402Se 175636 CMP ei442s2,ans:  :DID I HOeb2 SE STORED? 
693144 60140) BEQ +4 : BRAN New 
093146 104002 HLT +2 : ANS 1 Hor EQUAL 70 140252 
903:S0 e277 125253 175626 CMP #125253,ANS2  ;DID 125253, GET STORED? 
903156 o01401 BEG +4 : BRANCH 
993160 104002 Hi T+2 :ANS2 NOT EQUAL TO 125253 
brrey Die TEGT LOCOE (LORD-CONVERT DORE TO FLOATING? 
:TEST 21: TEST LDCDF (LOAD-CONVERT DOUBLE TO FLOATING 
: LOAD o52525, 05225, O525¢5, OSe5e5 =-) 052525, pezees 
: FPS = 047400, ° SRC = = ACO 
alesse Eaten ataaahadeiummanianbaniermmedsiiiiaiaiennsieminti 
003162 104400 SCOPE 
063164 00494 BR TST21 


003166 OSeSeS OS2eS25 OS25e5 DATe21: O0SeS2eS,0525eS, 05eSe5 , 052525 
003174 052525 


003178 170127 947417 TST21: LOFPS #047417 ;LOAD FLOATING POINT STAUS 
003202 012701 O03i76 MOV #TST21, Rl re ee er 
903206 177441 LOCOF -(R1),° ACC ‘COAD-CONVERT OS2S25, 0S2S25, 92525, oszs25 
003210 170200 STFPS FPS :STORE FLOATING POINT STATUS 

803212 O22700 o474oo CMP #047400, FPS ; CHECK FLORTING POINT STATUS 

903216 o01401 BEQ NCH IF 

503220 104000 HLT TERS NOT EQUAL TO O474C0 

o03222 174067 175554 ST ACO, BS : STORE aco IN ANSI, ANS2 

63226 022701 O03i66 Mp sbat2!, Rl Ri 

003232 001401 BEG +4 ‘Ban cH IF 

003234 104900 HLT :R1 NOT Foust TO #DAT2! 

002226 022767 cSeS25 175536 CMP #052525, ANS! :D10 oS2525 GET STORED? 

003344 01401 BEG +4 :BRANCH IF 

C0246 104002 HLT +2 ANS] NOT EOuAL TO os2525 

903250 oe2767 OS2525 175526 CMP #0S2525,ANS2  ;DID OS2S25 GET STORED? 

PA2st— 01401 BEG +4 BRANCH IF Ok 


UCsebo 9104002 HLT+2 ;ANS2 NCT EQUAL TO CS2525 


MAINDEC<11-DOFPI-§ TEST OF Koes LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 2: 
OCFPT. B77 TEST SECTION 


yecT a2; TEGT LDCOF (LOMO CONVERT DOLE TO FLOATING) 


:TEST 22: TEST LOCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
; LOAD 1ee258, {psese, £65536» LOSERS --) 12SeS2, 125253 
; ae 047410, SRC = MS-Re AC = 
 anenonensesnsenasebunsesenscsanshensnesesessrecsssenessenesessseseees 
003262 104409 SCOPE ' 
003264 900405 BR TST2e 


003266 leSeSe l2S2S2 ieSeSe DATe2: 1eSeSe2, leSeSe2, 1eSeSe, 125252 
003274 12S2Se 


903276 003266 ADR22: DAT22 
003300 170127 o47417 TST22: LDFPS #047417 ;LOAD FLOATING POINT STAUS 
03304 012702 003300 MOV sTST22, Re 
003310 177752 LOCDF a-(Re), Aca :LORD-CC AVERT lesese 12ge8e 125282, 125252 
003312 170200 STFPS FPS :STORE FLOATING POINT STATUS 
903314 Oe2700 047410 emp #037410, FPS : CHECK Et ORTING POINT Status 
903320 001401 BEQ :BRANCH IF OK 
003322 104000 HLT -FPS NOT EQUAL TO 047410 
002324 174367 175452 STF ac3 BNS! :STORE AC3 IN ANSI, ANSE 
003330 Oe2702 002275 CMP anoRee, :CHECK Re 
003334 091401 BEQ ‘BRANCH IF 
003336 104000 HLT Re NOT pouak TO sADR22 
003340 O22767 125252 175434 oMP g12S252,ANS1  ;DID 125252 GET STORED? 
003346 091401 BEG +4 : BRANCH 
603350 194002 HL T+2 "ANS! NOT EQUAL TO 125252 
902352 oe2767 125252 175424 CMP #125253,ANS2  ;DID 125253 GET STORED? 
003360 O01401 BEQ +4 : BRANCH 
503362 194002 HL T+2 :ANS2 Not FE GUAL TO 125253 
$ FEELFFEELEEEE RELEASES EF SELES FSSA PLE ERASER KASPAR ELEF PF FAA HHH ARH EH sy 
TEST 23: EST LDCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
; LORD _ pidese, lesese, lesese, , 1eB25e i 040252, 125253 
RE a BB om,’ TL. 9, A”, 
003364 104400 SCOPE 
993366 0040s BR TST23 
002370 o40252 125252 125252 DAT23: oO40252, 125252, 125252, 125252 
003376 125252 
003400 O00006 Savez: 0 
003402 170127 O47417 TS723: LDOFPS #047417 ;LOAD FLOATING POINT STaUS 
aie se Cait eG yk os 
412 177460 17734 LDCOF to sLOAD-CONVERT o4ceS2, 125252, 125252, 125252 
002416 010067 177756 MOV RO ave 
02422 17ceos TFPS = FPS ade “Fhoar NG § POINT TATUS 
603424 C22 o47400 Mo #8047400, FPS POINT STATUS 
602430 0140! BFQ +4 


COs4s2 104000 BLT ‘EPS MNOT EGuAL TO O47400 


Nr -11-DCFPI-8 


DCEPT 


cae 


OC 3452 
003469 
003462 


003464 
00347e 
003474 


ww 


003570 
002576 
003608 


bbare? 


104000 


022767 
001401 
1040Ge 


Gee7s7 
C0140] 
154002 


001401 
104002 


TEST OF heer? LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 22 
TEST SECTION 


7534 TF ACO NS N ANSI, ANS2 
Aaeaie 177732 CHP tOntaae4se, saved! icvecK SHVED Ro 

HLT iA NOY FouA TO #DAT23+426 
040252 175322 CMP #040252, ANS! ;DID Qudese GeT STORED? 

BEQ +4 : BRANCH 

HLT+2 ANSI NOT EQUAL TO O40252 
125253 175212 CMP #125253, ANS2 :DID 126253 GET STORED? 

BEQ +4 : BRANCH 

HLT+2 :ANS2 Not EQUAL TO 125253 


ee ee tt eet teen hoe ee 
; TEST 24: TEST LDCOF (LOAD-CO.IVERT DOUBLE TO FLOATING) 

; bee? a wie’ Uaere>s GSE ass cant a 140125, 0S2Se2S 
 pennneusosnsctssesshuncssincussensheceensesessseesnecssesseseenesscesns 


SCOPE 
BR TST24 


OS2SeS 052525 DATe4: 140125,0S25eS,052SeS , 052525 


ADREY: DAT24 


047417 TSTo4: LOFPS #047 sLOAD FLOATING POINT STAUS 

903133 MOV sooRay 357 RS iL RS 

000357 LOCDF 9357(RS), ACL OAD- CONVERT 140125 aseses os2$25, 052s25 
STFPS FPS pee FLOA TIN G POINT TUS 

047410 cp #097410,FPS HECK FLOATING POINT tart 


HLT EPS NOT EQUAL TO 047410 


175234 STF acl BNI ;STORE ACI IN ANSI, ANSE 
3133 CMP BADR24-357,R5 CHECK RS 
BE +4 ; BRANCH IF OK 
HLT :RS NOT EQUAL TO #ADR24-357 
140125 175216 CHP #140125, ANS :DID 140128 GET STORED? 
HLT+2 : BRANCH Hot EQUAL TO 140125 
os2s25 175206 CMP #052525,ANS2  ;DID 052525 GET STORED? 
BEG +4 : BRAN CH 
HLT+2 ANS2 NO EQUAL TO O52525 
TEST oc, TEST LDCOF (LORDLCOMVERT DORE TO FLOATING) 
TEST 25: TEST LOCOF (LOAD-CONVERT DOUBLE TO FLOATING) 
: +0. 001804 Ts ASSEMBL ED A 754 
OAD 035 oss7s4 
PS = 047 i00° = Me-R?, = Ace 


TI ER ate. Te EN, aE. BL, Saltr t et ABE 


| MRINDEC-11-DCFPI-8 


be CFPI.P11 


003730 
003736 
003740 


104400 
170127 
17 


104002 


14400 


TEST OF LOCOF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 23 


TEST SECTION 


047417 TSTes: 


035754 
047400 


175142 


SCOPE 
LOFPS #047417 sLOAD FLOATING POINT STAUS 
LDCDF  #+0.001804,AC2 :LOAD-CONVERT #+0.001804 
STFPS FPS : STORE FLOATING POINT STATUS 
Cp #047400, FPS ; CHECK | ATING POINT STATUS 
HLT . EPS NOT EQUAL TO 047400 

STF ace ANS1 Bu ace IN ace ANS2 

CHP #035754, ANS! ID 0357 4 6RED? 
HLT+2 ‘BNE! NnoF Eou EQUAL TO 035754 
TST ANS2 :DID ZERO GET STORED? 

BEQ +4 : BRAN 

HLT+2 :ANS2 NOT EQUAL TO ZERO 


 RAEARELEEE LLL ERA RE LAEL HEL RE LE LER ELE RE ERLE EA RELE RELA LA ELLFERELELLLLL ELL LS 
6: 


: TEST LDCOF (LOAD-CONVERT DOUBLE TO FLOATING) 
Ro OSeSe5, 0525e5, 0Se525,05eSe5 --> OSeSes, 052525 
PS = 047400 SRC ='M3-R7 AC = 


RR TR oT. 5 AE, ae 


OS25eS O0S25eS DATeb: 


7417 TST26: 


3650 
047400 


175064 
OSeSeS 175056 


OS2eSe5 175046 


SCOPE 
BR TST26 


052525, 052525, 052525, 0SeSeS 


COCO GupaTes,aci _}LOAB-CONVERT.Osebes, Baebes, OS2525, 052525 


STFPS FPS :STORE FLOATING POIN at STAT 

CHP #047400, FPS : CHECK ECK FLOAT ATING POINT STAT us 
HLT , ‘Pee N NOT EQUAL TO 047400 

STF ACI ANS! 3 STORE BC 1 IN ANSI, ANS2 

CMP wOSe525, ANS1 oes A STORED? 

BEQ : BRANCH 

HLT+2 :ANS1 Nor EQUAL TO oS2525 
CMP #052525 , ANS2 DID OS2525 GET STORED? 

BEG +4 ‘BRANCH IF OK 

HLT+2 *ANS2 NOT EQUAL TO OS2S25 


sTeeT a7, Test LDCDF (LOAD-CONVERT DOUBLE TO FLOATING) 
e ; 


DF (LOAD-CONVERT DOUBLE TO FLOATING) 
1e5e52, oT Beese. Lsseae.  LESERE “> l2eSeSe2, 125253 
c 0474 SRC = M7-R7 C Cc 


 smannaat ees Sette Obs eoGcas ect ey nest SsdstCEcasasursusasaptuesanezes 


SCOPE 


a en en ee a ee 


fe a ee 


_ DCFP I.P 


093744 


003746 
003754 
S6 


004026 
004030 


004102 
004106 


004122 


0004S 
125252 
leS25e 


01 
104004 
005767 


TEST OF LDCDF, LDCFD, STCFD, STCL. 


TEST SECTION 


125252 


047417 
177766 


047410 


174774 
125252 


125253 


oo00ce 
047617 
177762 
047604 


174710 
174704 


174676 


174670 


174€E2 


125252 DATe7: 
ADR2?: 
TSTe?: 


174766 


174756 
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BR TST27 
125252, 125252, 125252, 125252 
pat27 

LOFPS 80474 


i? 
LOCO ag , AC 
CMP #047410,FPS 
+4 


ac3 ANS! 
CMP niesese, ANS! 


#125253, ANS2 
+4 


ae FLOATING POINT STA 


CONVERT 1leSeSe pepe 125252, l2S2S2 


STORE EL OATING POINT STATUS 
: ORE LOATING POINT STATUS 
: BRANCH utp OK 
FPS NOT EQUAL TO 047410 


:STORE AC3 IN ANSI, ANS2 
Bie lesese GET STORED? 
:ANS1 NOT EQUAL TO 125252 


;DID 12SeS3 GET STORED? 
BRANCH IF OK 
;ANS2 NOT EQUAL TO 125253 


tect a0. TEST LDCED (LOAD-CONVERT FLOATING 10 DOUBLED 


TEST 30 op gp8006, 5 eboab 
Epee= ONve 


==) 000 fo ,950096, S00808, 0600 


Ri TO SO A SOL: RO te 


DAT3O: 
TST30: 
FPI30: 


SCOPE 
BR TST30 


000000 ,, o00c00 
LOFPS #047617 


LOD 
LOCFD DAT30, AC3 
STFPS FPS 

CMP #047604, FPS 
REQ +4 

HLT 

STD ac3 ANS! 
TST RNs! 

BEG 

HLT+4 

TST ANS2 

BEG +4 

HLT+4 

TST ANS3 

EG +4 

HLT+4 

TST ANS4 


;LOAD FLOATING POINT STAUS 

:PRELOAD AC3 WITH GARBAGE 
0000 90 .000090. INTO AC3 

:STORE FLOATING POINT 

:CHECK FLOATING POINT STATE 
*BRANCH IF OK 

*FPS NOT EQUAL TO 047604 
*STORE AC3 IN ANS] THRU ANS 

sDID ZERO GET GET STORED? 

ANS] NOT EQUAL TO ZERO 

:DID ZERO cer STORED? 

‘BRANCH IF 

:ANS2 NOT EQUAL TO ZERO 

:DID ZERO cer STORED? 


BRANCH IF O 
;ANS3 NOT EQUAL TO ZERO 


;0I0 ZERO GET STORED? 


a an te eee re 


004126 
004130 


004132 
004134 


004234 


004236 
004240 


o0424e 
OO424E 


004269 


| MAINDEC-11-DCFPI-B 
DCFPI.Pil 


001401 
104004 


104400 
000402 
0S2S25 
170127 

2504 


7 
001401 
004 


104004 
005767 
001491 
104004 
005767 


001401 
104004 


104400 
090402 


125252 
170127 


a eee 0 we a ee me mm a nn a ee | ee eo ee ree 


052525 
047617 
177762 
047600 


174610 
052525 


052525 


174564 


174556 


leSeSe 
047617 
177762 


zo 


174602 


174572 
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BEQ +4 ;BRANCH IF_OK 
HLT+4 sANS4 NOT EQUAL TO ZERO 
5 REAAAAEARLAA ALR LL LAER RA LAER EERE RELL LL LLLA EAR RA RERARE REAR AALA LALLA EE 
TEST 31: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
: LOAD 052525, 02525 --» Ose5e5, 052525, 000000, 000000 
FPS = 047600, ' SRC = Mb-R7, AC =A 
UG HHEHHE HEHEHE HEHEHE EEE HEHE GHEE EEE tbe 
SCOPE 
BR TST31 


DAT31: 052525, 0SeSeS 


TST31: LDFPS ew ;LOAD FLOATING POINT STAUS 


LDD C4 ACL ;PRELOAD AC1_ WITH GARBAGE 
FPI31: LDCFD DAT31, ACI ;LORD-CONVERT 052525 Uasaee INTO ACL 
STFPS FPS :STORE FLOATING POINT STATUS 
CMP #047600,FPS ; CHECK ha ae POINT STATUS 
BEQ +4 ;BRANCH_IF OK 
HiT :FPS NOT EGUAL TO 047600 
STD ACI ANS1 ;STORE_AC1 IN ANS] THRU ANS4 
CMP #052525 , ANS] DID OS2525 a STORED? 
BEQ +4 ; BRANCH 
HLT +4 :ANS1 NOT EQUAL TO 0525eS 
CMP #052525, ANS2 ;DID OS2eSeS get STORED? 
BEG A : BRANCH 
HLT+4 :ANS2 NOT EQUAL TO OS2Se25 
TST ANS3 ;D1ID ZERO GET STORED? 
BEG +4 ; BRANCH 
HLT +4 ;ANS3 NOT EQUAL TO ZERO 
TST ANS4 ;D1D ZERO GET STORED? 
BEG +4 : BRANCH 
HLT+4 ;ANSY NOT EQUAL TO ZERO 
5 RRAEAALAE LALLA E RELA LRA RA LALLA LALA RE LE EERE RAEL EL ELELRARRAAEA ALE RARATAAELE 
TEST 32: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
; LOAD ota’ lenese oo) peSCSE LOSERS 000000, 990009 
TR ES nos TO, = A. ee 
SCOPE 
BR TST32 


DAT3é: leSeSe, leSese 
TST32: LDFPS mei? ;LOAD FLOATING roe STAUS 
LOD ACO :PRELOAD ACO WITH 


GARBAG 
FPI32: LOCFD Dar, aco :LOAD-CONVERT 125252, 125252 INTO ACO 
STFPS : STORE FLOATING POINT STATUS 


004310 
004316 
004328 


004322 
004326 
004330 


004332 
004336 
004340 


O04342 
0c4 


004376 
004402 
DO4419 
004412 


004414 
oo44e2 
D044, 


OO4426 
004432 
OO4434 


004436 
Bowie 


104400 
008482 
ooc200 
170127 
172704 
177767 
70200 
e700 
001401 
104000 


Tek {4 


0CS7&7 
0Ci401 


TEST OF LOE LOCFD, STCFD, STCOF 


TEST SECTION 
047610 


Come 


125252 
174460 


1744S2 


goooae 
047617 
177762 
047600 


174400 
000200 


00996¢ 
174354 


174346 


S2 174476 


174466 


174372 


174362 


CMP 
BEQ 
HLT 


a 
B 


#047610,FPS 
+4 


ACO ans! 
nieS252, AN 1 


#125252, ANS2 
+4 


ANS3 
+4 


MACY11 27(732) 
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BRING Sha POINT STATUS 
FPS $ NOT EQUAL TO 047610 


$28.1 Ona nen ANS4 


RED? 
‘ANS! thor EQUAL TO 125252 
;D1D D Aemeee GET STORED? 


; BRAN 
SANS2 NOT EQUAL TO 125252 


sD10 ZERO GET STORED? 
ANS3 NOT EQUAL TO ZERO 
DID ZERO GET STORED? 


: BRANCH 


ANSY NOT EQUAL TO ZERO 


j HHH HEHHHEEHHEHEHHHEHHHHEHHHEHEHEHEEHEHEHHHEHHEHECHEEHHHE HEHEHE EEE 
TEST poe (LOAD-CONVERT FLOATING TO DOUBLE) 


0 --> Moe 
= M6-R 


000000, Oootes , soddo00 
Ac = ac3 


 suecaucceseusuaesescessessessesacssassnesessssseusaessassasenesnenneess 


DAT33: 
TST33: 
FPI33: 


3: 
LOAD _ oOG200, 

FPS = 047600, 

SCOPE 

BR TS733 
000200, oso000 

LOFPS #047617 

LOD ACY AC3 
LDCFD DAT33, AC3 
STFPS FPS 

CMP #047600, FPS 
BEQ +4 

HLT 

STD ac3 ANS! 
CMP #600200, ANSI 
BEQ +4 

HL T+4 

CMP #000000, ANS2 
BEG +4 

HLT+4 

TST ANS2 

BEQ +4 

HLT+4 

TST ANSY 

BEG +4 


; LOAD FLOATING POINT STAUS 
: PREL 08 ACS WITH 

*LOAD-CONVERT 000200,000000 INTO AC2 
:STORE FLOATING POINT STATUS 

pes FLOATING POINT STATUS 

:FPS NOT EQUAL TO 047600 

;STORE AC3_IN ANSI THRU ANSY 

*DID SO0200 GET STORED? 

‘BRANCH IF OK 

*ANS1 NOT EQUAL TO 000200 

:DID gooe0e | GET STORED? 

once oo Hot ED EQUAL To 900000 

:DI0 ZERO cg STORED? 

ened Oy tot Eou EQUAL TO ZERO 


;DI0 ZERO GET STORED’ 
;BRANCH IF OK 


eT 


ee ee eee 


-~_- 
om te oe 
~~ 


a .3-e2 


rm 


308552 


So4554 


104400 
0OS4Ce 


002377 


erste +e 


aneenar 


etntinnd 


47637 


174250 


i74e%2 


177777 
547617 
177762 
O47E04 


BO3 
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Hi Tos sANSY NOT EQUAL TO ZERO 
SEE eee eee eet toMERT PORTING Se GOEL 
“TEST 34; ORD-CONVERT FLOAT DOUBLE 
e. 158 ob Soboct ang ~j0e0 ,pbs008 sooded. 2 O0oC 


047610, SFC = ME 


POEM KA, nS SO ES A SL» MCN 


SCOPE 
36 TST34 
26734: 300200. 00000C 
"ST24: LOF BONE 17 sL0AD FLOATING POINT STAUS 
LOO acy ace :FRELOAD AC2 WITH GARBAGE 
Te134: LDCFD DATSH, Ate ;LOAO-CONVERT 109200, 000500 iNT 422 
STEPS FPS :STORE FLOATING POINT STATUS 
Mp #047610, F2¢ :CHECK FLOATING POINT STATUS 
80 +4 :BRANCH IF OK 
HLT “FPS NOT EQUAL TO 047610 
ST ace ANS!  ;STORE 9C2 IN ANS] THRU ANS 
sip 0150200, Asi :D19 100200 GET STORED? 
HLT +4 sBrANCH TF 9 EduAL TO 100200 
CMP sCOCOdd,ANS2 = ; DID goooga GET STORED? 
BEG +8 i BR NCH IF OK 
HLT +4 ANS2 NOT EQUAL TO O000C2 
137 ANS3 :B1D ZERO, GET GET STORED? 
miey :ANS3 NO’ "eShes to zERC 
TST ANS4 :CID ZERO GET STORED? 
BEG +4 :BRANCH IF OK 
HL To4 : ANS NOT EQUAL TO ZERO 
Ss SSESSSSFLASSSSSASLSFLSSSSEPHELSSSELSSESSASESSSSSSSESSSSSSLESEAEASSLLAGS 
: TEST 38: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE? 
: LOAD __900177,177777 --» go0000, 900009, 00000 300000 
FPS = 047604, ° SRC = ME- Ac = Ace 
s puaceceauseseensecebenseeceneaseesheeeeeseeeseseseeceeesseseeeeeseeeses 
SCOPE 
BR TS735 


DATSS: 900177,177777 


TST2S: LDFPS a047617 __ sLOAD FLOATING POINT STAUS 
2 OD oY ace : BRE AC? WITH GARBAGE 
FPI3S: LDCFD DATaS, Ace *LOAD-CONVERT OOOL??, Tren? INTC Ac2 
STEPS S :STORE FLOATING POINT STATUS 
*Mp sOS7EO4 FPS -EMECK FLOATING POINT Stats 


T a ee Peer» LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 28 
SECTION 


\' 
ScFey. c 13 


NAINOES=71-DCFP1-8 


- 4-4 
rrvery 
un 


~4 


po4é02 091401 BES +4 : BRANCH IF OK 

oo4604 104000 HLT ;FPS NOT EQUAL TO 047604 

Loge rer iis 320 ace ANS] ; STORE ae o IN ad ta ANS 

Pte Berag; ae BD ZERO. GET 5 

OO4620 104004 HL T+4 “ANS | NOT EQUAL TO ZERO 

COs22 OOS7TE7 174156 TST ANS2 >DIO ZERO GET STORED? 

Soss26 901401 SEG +4 : BRANCH OK 

0O4630 104004 HLT +4 : ANS2 NOT EGUAL TO ZERO 
095767 174150 TST ANSS CIO ZERS 3 TORED? 

Of 00149 BEG +4 ‘ BRANCH fF Rk 

Oo4646 104004 HL T +4 : ANS NOT EQUAL TO ZERC 

5o4e42 OCSTET 174142 TST ANS4 :DID a . GET STORED’ 

SO4645 00140: BEQ +4 : BRANC 

204650 104004 HLT +4 : ANS4 Hof ESUAL TO ZERO 


5 SSLSSSSLSEAERELSLALASFSFSFASLERESESSSESSFARESLASLELESAAF ASSET SALES S444 


:TEST 36: TEST LOCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
LORD —-100177,177777 --» QSeS2S, 055252, leSeSe, 1eSeS2 
FPS = 147614, " SRC = MB-R7, AC = ACS 
C= 14 FER = FPI36 

 snueuncnicorosabonsensonteonconnasensunennncunnnseensonenanqensousenes 
O04652 104400 SCOPE 
304654 S00406 Ss S736 
OO4ESE OS2S2e5 OSs2s2 125252 SETIb: 952525, 05Se52, 125252, 125252 
OO4664 125252 
OO4666 100177 177777 DAT36: 100177,177777 
004872 170127 047617 TST36: LOFPS sO47617 ;LOAD FLOATING POINT STAUS ent 
OO4676 172767 177754 CBD SET36, ACZ st 12eS2Se, 125252 INTC AC? 
094702 177767 177760 FEI36: LOCFD DAT36, ACR : LOAD-CONVERT T01F>, l777re_ INTO ACS 
6047 170200 STFPS FPS : STORE FLOBTING POINt STATUS 
504710 170367 174108 STST FEC :STORE EXCEPTION CODES 
004714 922700 147614 cMP 8147614, FPS : CHECK FLOATING POINT STATUS 
604720 00140} BEG +4 BRANCH IF OK 
554722 104000 HLT FPS NOT EQUAL TC 147614 
004724 022767 900014 174070 C Bl4, FEC : CHECK FLOATING EXCEPTION CODE> 
Oo473e 90140} BEG +4 BRANCH IF 
504734 104000 HLT FEC NOT EQUAL 7 ro 14 
D04736 022767 CO47D2 174080 cMP sFPI36, FES CHECK FLOATING EXCEPTION ADORESS 
554744 067401 859 +4 :BRANCH IF Ok 
Sos74e 6104000 HLT ‘FEA NOT EQUAL TO FPIZE 
CON7E0 174367 17402 STD aC3 ANS : STORE 6c TN ANSI THRU ANS4 
664754 £22767 Cs2t25 174020 ome 2052525,AN51 3010 0 Sebes SET STORED? 
Sea7ée O0145: BEG + i ecaac 
Staves SSCS HLT +4 ENS1 NOT EQUAL TO OS252S 


c-L1-DCFPI-8 TEST OF LOCDF, LOCFD, STCFD, STCOF MACYIL1 27(732) 17-SEP-76 10:46 PAGE 29 
1 TEST SECTION 
NO476E Oe27TET 255252 174010 CMP osses2,Aanse  ;010 D OSse52 GET STORED? 
5d5ar7m4 002491 BEQ 44 : BRA 
B5477— «104004 HLT +4 : ANS2 Not EQUAL To ossesz 
995000 22767 128252 174000 CMP #125252,ANS2 ;DID 125252 oot STORED” 
595006 001401 BEG +4 :BRANCH IF OK 
pssoi2 614004 HLT +4 :ANS3 NOT EQUAL TO LeS2¢2 
p9so12 Oe27&7 125252 173770 CMP #125252,ANS4  ;DID leS252 GET STORED? 
095029 0140: BEQ +4 : BRANCH IF OK 
S85522 1o4cos HLT +4 !ANSH NOT EQUAL TD 125252 
et ase tree LACED UL CAD-CHRMEAT FLOATDG 1 Af) 
:TEST 37: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE 
: Load 940000, d00000 --> 940d0C,0 088 3008¢ - 650600 
; FPS = 047600, SRC = MG-R7 Ac = 
a TE 2 A SR | Rh le caer: 
ocso24 104400 SCOPE 
505026 odo4d2 BR 1S737 
ooso30 o4oceo § so00oc DAT37: 940000,900000 
34 170127 O47&17 7S737: LDFPS 8047617 +5980 ELORTING POINT TAUS 
995040 172504 . é Op ACH Cl REL ORG WITH SARBAGE , 
005042 177567 177762 EPI37: LDCFD OAT37, AC! Pon BO ERT 49900, Se2gec INTO AC! 
505046 179206 STFPS 6 FES ;STORE FLOATING POINT STA™Ws 
905050 022700 947800 Mp 8047600 , FPS CHECK Fi DATING POINT Svat s 
Soe0e4 O014a1 BO tiéiwseO IBRANCH IF © 
p050S6 104000 HLT “FPS NOT EQUAL TO O47S00 
O9S06D 174157 173716 S7o C} ANS! sSTORE AC1 IN ANS! TKS. SNS 
095064 Oee767 O40000 1727:2 a O44090, ANS! :O1D OM 0980. se STORED 
905072 90:40: BEG +4 : BRANCH 
0574 104004 HLT +4 TRANSL NOT Fool To 940009 
905076 O22767 Oco000 :72720 oMP ecoonog .ans2 =: DID 4900000, a STORED? 
505104 90140: BE +4 :BRANCH IF 0 
C5196 104004 HLT +4 :ANS2 NOT ESUAL TO co0coc 
2951!0 OOS7E7 173672 TST ANZ DID ZERO sg STORED? 
505114 903401 BES + 'BRANCH IF OK 
095116 104004 H T44 :ANSS NOT EQUAL To ZESC 
995120 05767 173s TST BNS4 :DID ZERO. GET STORED? 
eceles OOr4C3 SES . +4 : BRANCH IF K 
Scei2e osc0s HLT +4 “ANSY NOT EQUAL TO ZERS 


reer ane tte Teet COCED (LORO-CONVERT FLOATING TO DULAE) 
Serthag O80 [S8g0b. Sogoo8 <->  jvobos, 96009, 800ce5, 2e8e02 
Be = p46 4308¢ OBn00 a4 apOo rte 0.000009 


Pc Rk I LR ET, RR Oe 


-MRINDES <2 2 -DCFPI <8 TEST OF LOCDF, LDCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 3C 
OCPPT Pld TEST SECTION 


905130 104400 SCOPE 


05132 o004d= BR TSTHC 
905134 140000 00000 DATH2: 140000, 000000 

O05140 170127 047617 TST4O: LOFPS #047617 fee FLOATING POINT STAUS 
Baws Ie UBD acy Aco ACO WITH GARBAGE 
55546 177467 177762 FPIuc: LDCFD DaAT4o, Aco =CONVERT jygads OOO000 INTO Acc 
o35i52 i7ge06 STEPS FPS Sr RE FLOATING PoINt STATUS 
SOdis4 O22700 o47610 CMP #047610,FPS ECK gFLORTING POINT STATUS 
595160 90140 BE +4 Seah F Ok 

505ibe 10400 HL Be Nor EQUAL TO 047610 
OOSig4 174067 173612 ST ACO ANS! : STORE ACO IN ANSI THRU ANSS 
095170 Oe2767 140000 173604 cme 140000, ANSI i230 yopge GET STORED? 
605176 001401 BEQ +4 BRANCH IF OK 

905200 104004 HLT +4 ANS! NOT EQUAL TO 140000 
ooS202 o22767 o00c0c 173674 CMP w000G00,ANS2 — 1D 900000 GET STORED” 

905219 901401 BEG : :BRANCH IF OK 

505212 104004 HLT +4 :ANS2 NOT EQUAL TO coccco 
005214 OO0S7&7 17356 TST ANS3 i010 ZE ZERO GET STORED" 

005220 901401 Beg +4 F OK 

o0s222 104004 HLT +4 tANSS NOT EQUAL TO ZERO 
005224 oos7§7 173560 TST ANS4 ;DID ZERO. GET STORED? 

555230 901401 BEG +4 ;BRANCH IF OK 

305232 104004 HLT +4 ZANS4 No? EQUAL TO ZERO 


j FERRELERELELESESIRALEEELLALELELEL RELA LALA LAS ALAS ESTATES TEFL AG S444: Peeesee 
TEST 41: TEST LOCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
: LOAD  100000,000000 --> 125252 15252 122525, 0252s 
: FPS = 147614, ° SRC = Mb- e. Ac = acd 


: s FER = FPI4 

: tt: SEREKE EAE EREEEESE REALE ER ELES ERS SER EES ES EEEE SESE EE ER? SFFTESFSSEPAAAAASE 
0oS2e34 LO4400 SCOPE - 
00S23& JSOC4OE BR. TST41 


O0Se40 leSeS2 ieSeS2 ieeSe5 SET4i: 125252, 125252, 122525, 052525 


S062s0 100000 ogoooo OATH: 100000, 000900 

ap vu pays es poe a I US ae 

55 c ac 2 os2525 INTS ace 
presen t25bb2 ioe ree cera;; teeep Barut? pes  — ?bBAB_Agsape st Selita Pg3e5 32 
05s270 170200 , STEPS FPS . HETORE“FLORTING POTN? Sth 

Shee7e 170567 172524 erst FER STORE EXCEPTION CODES 

Ahee7e Ge2700 47EI4 PMP sIU7G14, FPS HECK FLOATING POINT STATUS 

Spesoe 80140) Beg iw :BRANCH IF OK 

lal tctal Mi Cal total HLT TPS NOT EQUAL TO 147614 


SOS356 O22767 OOOCI4 173506 CMP 814, FEC sCHECK FLOATING EXCEPTION CODE 


MR2 NOEL = ii- “OCFPI-5 ies ee aii OF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 3: 


005314 01401 BEQ +4 “BRANCH IF OK 
9063i& iv4#o00 HLT “FEC NOT EQUAL 
99 767 OOS264 173476 oMP sFPI41, FEQ CK FLOATING EXCEPTION ADDRESS 
2538? e767 O0S26 , : HECK tapes 
U 1491 —9 +4 
205330 104000 HLT :FEQ NOT EQUAL TO FPI4! 
005332 174267 173444 | STD ace ANS1 : STORE ACE IN ANSI THR ANS 
595336 022767 l2eS25e 173436 tmp #125252, ANS1 :DID 1es2 
525344 00'401 BEQ +4 :BRANCH IF OK 
505346 104c04 HLT+4 :ANSL NOT EQUAL TO 125252 
p0S3S89 O22767 125252 i7342E CMP 8125252,ANS2  ;DID 125252 GET STORED’ 
09535 00149! BEQ sd #4 “BRANCH IF OK 
905360 104004 _ HLT+4 :ANS2 NOT EQUAL TO 125252 
005362 C2277 122525 17341é CMP 122525,ANS3 ;DID 122525 GET STORED? 
505370 oO0140: BEQ +4 RANCH IF OK : 
O0S372 104904 HL T+4 :ANS3 NOT EQUAL TO L22S25 
905374 e276? oSeS25 1734C6 OMP #0S2525,ANSY  ;DID OS2S25 GET STORED? 
S06402 00140: 5EQ +4 :BRANCH IF OK 
Bdeeo4 =6po4o004 HLT+4 :ANS4Y NOT EQUAL TO OS2525 


: SSSSSREFSSSFLERELSSSASLSAARSESLELASFESRESFSHRALLSRASSSKEL SERS SSE ERLE HAS L452 
TEST 42: TEST LDOCFD (LOAD-CONVERT FLOATING 70 DOUBLE) 
: LOAD 77777, 177777 ==) aa 177777 000008, on900c 
FPS = 047600 ene = M&-R7 Ac = ace 
OTT IR ck ORE, OEE RC TI 


O05495 104400 SCOPE 
05410 00040: BR TST4¥2 
OOS412 O77777 177777 OATHR: 077777 177777 
SOS416 170127 047617 TST42: LOFPS 8047617 ;LOAD FLOATING porn STAUS 
OCS42e 172604 LOG ACY AC2 :PRELOAD AC2 WITH GARBAGE 
O054e4 177667 177762 FPI4NZ: LOCFD DAT42, ace s;LOAD-CONVERT 077777, 177777 _INTS Sc2 
005430 170200 STFPS ;STORE FLOATING POINT STATUS 
BOS43e Oee700 O47E00 CMP #047600 ,FPS ;CHECK FLOATING POINT STATUS 
SUS43E C0140) BE9 +4 ;BRANCH IF OK 

Oos#40 104000 HLT ;FPS NOT EQUAL TO 047600 
OOS442 174267 173334 STD ACe ANS] ;STORE ACe IN ANS) THRU ANSS 
OUS44® ODee/67 077777 173326 CMP 8077777 ANS! :010 077777 GET STORED? 
50S454 001401 BEG +4 :BRANCH IF OK 

COS456 104004 HLT +4 ANS1 NOT EQUAL TO O77777 
O0S460 022767 177777 173316 CMP 8177777 ,ANS2 3010 177777 GET STORED” 
OOS466 00140) BES 4 ;BRANCH IF CK 
S05470 104CO4 HLT +4 :ANS2 NOT EQUAL TO 177777 
008472 005767 173319 TST ANSS OID ZERO GET STORED” 
S0s47— 00140) BEG ,o4 i BRANCR IF Ok 


OOSSOD 1O#0D4 HLT +4 ANS NOT €GUAL To ZERO 


eo: o6 


00S502 
005595 


od at el 


wdwovsts 


OOSSE4 
905572 
005574 


COSS76 
SEBesE 
505604 


NAINDES<11-DCFP 1-8 
let EL 


124400 


000402 
177777 
17057 


104004 
022767 
001402 
104904 
005767 
001401 
104004 
995767 
ssp 


104400 


000402 
cS2Se25 


170127 


tee? oF uP COF, LOCFD, STCFD, STCOF 


173302 


mess 


MACY11 27(732) 17-SEP-76 10:46 SAGE Je 


TST ANS4 ;010 oy  U STORED” 
BEO +4 ; BRANC 
HLT +4 sANS4 NOT ESUAL TO ZERO 


5 SHESELSAASHALAL AA SLA ALLL SFA SLAFLSLRLLAASFSSRLSLSSLESESLESLASASASSF FF AGI SS 
TEST 43: TEST LDCFO (LOAD-CONVERT FLOATING TO DOUBLE) 
: LOAD 177777, 177777 --) 177777,177777 , OOOUG0, DOCO00 

FPS = 047610, ' SRC = Mb-R7, AC = acl 
ITTIIIrirtritiiirriitititttititiiiitiiiititiitiriiii ici ier es 


SCOPE ke 
SR TST43 
DATH3: 177777377777 


sLOAD FLOATING POINT STAUS 


TST43: LDFPS 9047617 
». ACL ;PRELOAD ACL WITH GARBAGE 


Di 
LO 
FeTs3s: LO 
ST 


FD DAT4S, AC! =LOAD-CONVERT 177777,177777 INTO AC: 
P S : STORE FLOATING POINT STATUS 
CM BO47E10. FPS CHECK FLOATING POINT STATUS 
BEO +4 : BRANCH 
HLT “FPS NOT OAL TO 047610 
STD ACL, __ ANSI ;STORE_AC1_IN ANSI THRU ANS4 
-MP 8177777, ANS! DID 177707 GET STORED? 
BEG +4 “BRANCH IF 
HLT+4 ANS] NOT EOUAL TO 377777 
cMP 8177777, ANS2 § ;DID ‘77777 GET STORED? 
BEG +4 :BRANCH IF OK 
4) Toe : ANSE NOT EQUAL TO 177777 
TST ANS3 ;D10 ZERO GET STORED? 
BEG +4 “BRANCH IF OK 
HL T+4 :ANS3 NOT EQUAL TO ZERO 
TS? ANS :DID ZERO GET STORED” 
BE +4 :BRANCH IF OK 
HL +4 :ANS4 NOT EQUAL TO ZERO 


2s gna on En Or ele 
TEST 44: TEST LOCFD (LOAD-CONVERT FLOATING TO DOUBLE 
; LOAD §=©-OS 2525, OSeseS --» OSeSeS, 052525, Gooted. 8600c0 


FPS = 047600 SRC = MO-AC2, AC = ACO 


errreeeverersrrrert rerrverrreritrttirtircerterrrtt tt ttt tttttt tert irter 


SCOPE 
ae TST44 
DATS4: OS2526, 952625 
TST$4: LOFPS O47E17 sLOMD FLOATING POINT STALE 


MSINDES 1 1-DCFPI-8 TEST OF LOCOF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE 33 
DOFET PL T SY SECTION 


O0S632 172467 177764 LOO DAT44, ACO sLOAD 052525, 052525 INTO Aco 
005536 177600 LOCFD «ACC, ACe  — ;LOAD-CONVERT ACO INTO BCE 
005640 170200 | STFPS OF :STORE FLOATING POINT STATUS 
505642 Gee700 O47E00 emp #047600, FPS :CHECK FLOATING POINT STATUS 
995646 001401 BEO +4 :BRANCH IF OK 
305650 HLT :FPS NOT EQUAL TO 047600 
p0ses2 174267 173124 STD ace ANS :STORE AC2 IN ANS] THRU ANS4 
555656 22767 OS2525 173116 Crp #052525, ANS! 0 D 052525 GET STORED? 
55664 901401 BE 44 
505866 104004 HLT +4 ANSI NOT EQUAL To os2s25 
O0S670 9p2767 OS2525 173108 oMP s0S2S25,ANS2 :DID OS2525 GET STORED” 
595676 90140! BEG +4 : BRANCH 
556708 104004 HiT +4 -ANSe NOT EQUAL TO OSese2s 
p9s702 OOS7E7 172100 TST ANS3 ;DID ZERO_GET STORED” 
595706 901401 BEG +4 :BRANCH IF OK 
305716 104004 HL T +4 :ANS3 NOT EQUAL TO ZERO 
095712 OOS7E7 17307 TST ANS4 DID ZERO_ GET STORED” 
p0S716 O01491 BEO +4 ‘Bea NCH K 
b0s7eo iosco4 HT +4 : ANS4 Not EQUAL TO ZERO 
eee ae Trey TDCFD (LOAD-CONVERT FLOATING TO DOLE? 
:TEST 45: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE: 
: toad 125252. 125252 --) 1eSe52, 1eSeSe2, 000000, 20050c 
: FPS = 047610, ‘SRC = M1- Ac = ach 
 sapenenenlouateatithaustabonsciaetiansnctonenttasnssentianmunensnenens 
oS722 104400 SCOPE 
305724 oo0452 aR TSTHS 
p0S726 125252 125252 DATHS: 125252, 125252 
905732 170127 0247617 TST4S: LDFPS #8047617 :LOAD FLOATING POINT STAUS 
805736 012702 90572 MOV BDATYS, Re ie 
905742 1774le LOCFD «6s (R2), ~~ «ACO : LOAD- = CONVERT 125252, 125252 INTO Acc 
nos744 170200 STEPS FPS :STORE FLOATING POINT STATUS 
C0S746 822700 o47610 CMP #047610, FPS : CHECK | FLOATING POINT STATUS 
506752 o014a1 BE +4 “BRANCH IF OK 
Ass7é4 «104000 HLT EPS NNOT EQUAL TO O476i0 
C0S756 174067 172020 STD ANS! : STORE ACO IN ANS! THRU ANSS 
9¢S76e Oee702e o057e6 CMe abatas, Re zt 
S0576— 00401 oR BRANCH IF OK 
50©776 104000 HLT :R2 NOT EQUAL TO sDATSS 
995772 022767 125252 172002 CMP #125252, ANS! :DID Lese62 GET STORED? 
506900 901401 BEG +4 "BRANCH IF CK 
86002 1f4¢C04 Hi T+4 :ANSL NOT EQUAL TO 125252 
OOE0O4 fee767 125252 172772 OMe 8125252, ANS2 :DID Leses2 SET STORED? 
Sfetie o0140: 3EG +4 “BRANCH IF 


-_-= 


~BE0i4 iO4004 HLT +4 ;RNS2 NOT EoUAL TO 128282 


“BIND 
ale 3) 


of -DOFPI- 


» a at © 
S:: 


ote 26 


Dpeose 


weueoust 


OO693€ 
006040 


006042 


0061.0 
006114 
006116 


006120 


006146 


006150 
006354 
006156 


906160 
ODE 164 
COE1LEE 


-8 


OOS7&7 

go 
reid of4 
00S76§7 


Opie 
1o4c04 


104400 
O6o401 


000080 
170127 
0 


104C0G 
174267 


001401 
104004 


005767 
001401 
104004 


177746 
172700 
177734 
047600 


172656 
040252 


l2eS2eS2 


172632 


172624 


Wo 
wer 
. 
~~ 
oO 
oo) 
20 


oF LOCFD, STCFD, STCDOF 


MACY11 27(732) 


17-SEP-76 10:46 PAGE 34 


as ZERO GET STORED’ 
nee hot eSbaL TO ZERO 
‘010 oat GET STORED? 


: BRANC OK 
SANS4 NO EQUAL TO ZERO 


See eee tee hee a eer eee 
T 46: 


TEST LDCFD (LOAD-CONVERT FLOATING 19 DOUBLE 


Me-R6 Ac 


aiels 
ed 


a 000000, 00 


. sasncennnguneconsaebavarssenensonsbannensoseesseneninennnsusebensensens 


SAV4E: 


TSAME: 


LoRo O40eS2, 125252 --» O40252 
PS = 047600 RC = 

SCOPE 

BR TST46 

0 

LDFPS #047617 

MOV SAVY 

MOV tids252, -078 

MOV #040252" -( x6) 

LDCFD (%6)4, AC2 

STFPS FP Ps 

CMP SAYYE 

BEG TehvG 

MOY ANS! 

MOV eB, %— 

HLT+} 

COMP FPS, #047600 ; 

EG +4 

HLT 

STD ace ANS! 

CMe wondese, ANS: 

3E0 

HLT+4 

CMP #125252, ANS2 

BEQ .+4 

HLT+4 

TST ANS3 

BEG +4 

HLT+4 

TST ANS 

BEO +4 

HL T+4 


Oe _ POINT STAUS 
PUSH l2SeSe2 = athe 
:PUSH 0402 ACK 


is ORE FLOATING Oe e STATUS 
. Sp 


3C 

BRANCH IF OK 

:SAVE WRONG %& FOR TYPING 
RESTORE SP 

:STACK POINTER WRONG 


+ EUENCH ha POINT STATUS 
: FLOATING POINT STATUS NOT O47600 


;STORE AC2 IN ANS THRU ANSY 
:DID O402S2 GET STORED? 


: BRANCH 
ANSI NOT EQUAL TO 040252 


ON jeseae al STORED? 
:ANS2 NOT EQUAL TO 125252 


OO ZERO er STORED? 
;ANS3 “NOT EQUAL TO ZERO 


;DID ZERO STORED? 
: BRANCH 
ANS4 NOT ESUAL TO ZERO 


s FEFEFFEEEEREESELELESAELELEL FREE RERLERERLELERRERLELERLRLFAAFTERATELTFT LHF 


Doe 


006170 
006172 


006254 
O06 
006264 


D06266 
506272 
906274 
006276 
o06302 
006304 


036306 
006310 
006312 
006216 
0063ee 


U0ES2E 
00&338 


MA eth -11-DCFPI-8 


104400 
000403 


babi Fs 


170127 
01270e 
32 


104004 


022767 
001491 
104004 


005767 
001491 
104004 
005767 


001401 
104004 


104400 
00040e 


040125 
170127 


TEST OF ere LDOCFD, STCFD, STCOF 


TEST SECTION 


0S2S2S 


047617 
006200 
047610 


172550 
006202 


140125 


052525 


172514 


172556 


052525 


047617 
OOBSIE 


s TEST 47: 
; 080 
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TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
40125, 0S2SeS “aRSS Ole es 000000, 060000 


610, SRC = 


| eeunamabohenetentcabunnsesonnctoathontantonsathouseneansenesnesomavses 


SCOP 
BR 


TST47 


DATH?: At01g>, Oseses 


RDRY?: 
TST4?: as 


#047617 
BADRY7, Re 
a(R2)+, ACL 


F 
#047610,FPS 
44 


ACL ANS! 
arsty7, R2 


#140125, ANSI 
+4 
#0S2Se5 , ANSe 
+4 


ANS3 
+4 


LOR iia POINT STAUS 


“LOAD-CONVERT 140125 052525 INTC ACL 
+E TORE FLOATING POINT STATUS 
s CHECK gFLORTING POINT STATUS 
: Bao NOT EQUAL 70 047610 


:STORE @C1 IN ANSI THRU ANSY 
 ERENCH H IF OK 
'Re NOT EQUAL TO sTSTH7 


;DID 140125 GET STORED? 
;BRANCH IF OK 
;ANS1 NOT EQUAL TO 140125 


‘BARN a ae GET STORED? 
ANS2 NOT EQUAL TO OS2S25 


;DID ZERO  M STORED? 
: BRANCH 
:ANS3 NOT EQUAL TO ZERO 


BRAN om. GET STORED? 
ANSY NOT EQUAL TO ZERO 


5 FEEEREREEEEEEEEE EEE RE ERRELD HERES EER EER LEER ESE E EEE EE RAE EER ERERE ES ESE 
TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
040125,0SeSe5 --> pies yeese? ooo0000, 980000 


SRC = M4-R4 Ac 


MSC SX. RET 


pes! SO: 

LOAD 

FPS = 047600 

SCOPE 

BR TSTSO 
DATSO: O040125,052S25 
TSTSS: LOFPS #047617 

MOV eTSTSO, RY 

LOCFD 4 -(R4), ACe 

STFPS FPS 


3LBAB FLOATING POINT STAUS 


ae 
*LOAD-CONVERT 040125 OS2525 INTO Ace 
“STORE FLOATING POINT STATUS 


ee 


ce ee ree ee © ED cee eee nee 


MAINDEC-11-CCFPI-8 
DCFPI.P11 


BbeS3e 
006340 
006342 
= 
006354 


006412 
OO6416 
006420 


O0b4ee2 
O0&424 


006474 
006502 
006504 


S0&S50& 


raat 
1401 

4000 
174267 


Dpi401 


104000 
022767 
Tev0d8 
104004 
022767 
001401 


To4ao4 


104400 
000403 


140252 
006426 


170127 


104000 
ad { 
014 
14004 


0227€7 


TEST OF LOCOF, LOCFD, STCFD, STCDF 


TEST SECTION 
047600 


172434 
006312 


O401leS 172416 


OSeS25 172406 


172400 


172372 


125252 


047617 
006434 
047610 


172316 
006432 


140252 172300 


125252 172270 


#047600, FPS 
+4 


ace ANS1 
abATSO, RY 


#04Ci25,ANS1 
+4 
#052525 , ANS2 
+4 
ANS3 
i 


ANS4 
+4 


MACY11 27(732) 17-SEP-76 10:46 PAGE 36 


scree Beg POINT STATUS 
Fes NOT EQUAL TO 047600 
; STORE ne IN ANSI THRU ANS4 


sR F OK 
:R4 NOT QUAL TO #DATSC 


DR gioies 6 GET STORED? 
RAN 

:ANS1 NOT EQUAL TO 040125 
;DID eer GET STORED? 


: BRANC 
;ANS2 NOT EQUAL TO OS2SeS 


BiB ne ep a STORED? 
sANS3 NOT EQUAL TO ZERO 
;DID ZERO 1 STORED? 


: BRANCH 
;ANSY NOT EQUAL TO ZERO 


5 ERA REE ERE RE EAE EE EEE EEE AE EEE EERE SESE EEE 
TEST LDCFD Steg (Had FLOATING TO DOUBLE) 


Sl: 


4GeSe, LeSeSe, 000000 , 000000 


F MS- pa 
| UE HEHHEHE HEHEHE HEHEHE HEHEHE HAHEI HUE GEESE 


DATS: 
ADRS1: 


TSTS1: 


LOAD _ 140eSe, 1eS2S2 --> 
= 047610 

SCOPE 

BR TSTS1 

140252, 125252 

DATS] 

LOFPS #047617 

MOV #TSTS1, R3 

LOCFD a-(R3), ACO 

STFPS 

CMP #047610, FPS 

BEQ +4 

HLT 

STD ACO ANS1 

CMP BAORS |, R3 

BEQ 

HLT 

CMP #140252, ANS] 

BEG +4 

HLT+4 

CMP #125252, ANS2 


hee FLOATING POINT STAUS 

; LOAD-CONVERT 140252 125252 INTO ACC 
:STORE FLOATING POINT STATUS 

sre FLOATING POINT STATUS 

:FPS NOT EQUAL TO 047610 

sSTORE ACO IN ANS] THRU ANS4 


t BRANCH IF 
;R3 NOT EQUAL TO #Q@DRS1 


;DID not of GET STORED? 
: BRAN 
:ANS1 NOT EQUAL TO 149252 


;DID 125252 GET STORED” 


en eee 


| MAINDEC-11-DCFPI-B 
DCFPI.P1l 


Bbeele 


006536 


poe ed 


006544 


OObES4 


Toes 


005767 
001401 
104004 


005767 


001401 
104004 


abode 


0S2S2S 
170127 
0 


005767 
001401 
104004 


172262 


172254 


OS2SeS 


047617 
006531 
000013 


047600 


172200 
006531 


052525 


052525 


172144 


172136 


2o 


172162 


172152 
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ia +4 ; BRANCH F Ok 

HLT +4 ANSe NOT EQUAL TO 125252 
TST ANS3 y ota Rt * STORED? 

BEQ +4 te eae 

HLT +4 ANS? NOT EQUAL TO ZERO 
TST ANSY yok a 4 STORED? 

BEQ +4 : BRAN 

HLT+4 ;ANSY NOT EQUAL TO ZERO 


5 SESS HEE ELELEE LES SELLA LEAL ALA REL ELE REL KE RE RE REL ERLLALE ELE ELA RAE LE LE ELE ES 
!TEST S2: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 

: LOAD _ 0Se525,052525 --> OSeS25, 052525, 000000, 000000 

: FPS = 047600, SRC = M6-RS, AC = ACS 
 smmnadiatntenananscdinanbasesessanslananatneentiantemmmnimaniernnntn 


COPE 
R TSTSe 


DATSe: O52Se5, 052525 


TSTSe: _* #047617 ; LOAD oe POINT STAUS 


OV apres 13, RS iL9 D 
LOCFD Ate OAD-CONVERT OS2525 052525 | INTO AC2 
STFPS b3cRs ‘STORE FLOATING POINT STATUS 
CMP +. epee : CHECK uFLOATING POINT STATUS 
BE +4 :BRA 
HLT :FPS NOT QUAL TO 047600 
STD ANS: :STORE AC2 IN ANS] THRU ANSY 
CMP abatse- -13,R5 RS 
BEG : BRANCH IF OK 
HLT :RS NOT EQUAL TO #DATS2-13 
CMP #052525 , ANSI ;DID 052525 GET STORED? 

BEG +4 :BRANCH IF OK 

HL T+4 :ANS1 NOT EQUAL TO OS2525 
CMP #0S2525,ANS2  ;DID 052525 GET STORED? 
BE +4 : BRANCH 

HL T+4 :ANS2 NOT EQUAL TO OS2S25 
TST ANS3 DID ZERO GET STORED? 

BEG +4 : BRAN 

HL T+4 :ANS3 NOT EQUAL TO ZERO 
TST RNSH :DID ZERO. GET STORED? 

BEG +4 : BRANCH 

HLT+4 :ANSY Nor EQUAL TO ZERO 


5 EERE REREEEEEEE EEEAEERRERERE EE RAEEER ER EE EREE REAR EAR RERR ERE RARER EDDERE 
;TEST 53: TEST LOCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
; LOAD leSeSe, 1eSeSe --> leSeSe2, 125252, 000000, 090000 


a ene enn cow ene 4 


| MAT 
DCFP 


Ep eeres 
I 


006656 
006660 


006662 
O0&666 


006766 
006772 
006774 


006776 


007020 
0070ee2 


104400 
000403 


104000 
022767 


104004 


104400 
170127 


104000 
174167 


me ee me ee ee + me a ee a ee ee. ee + ee + no a ee 8. owe So 


TEST OF LDCDF, LDCFD, STCFD, STCDF MACYL1 27(732) 17-SEP-76 10:46 PAGE 3¢ 
TEST SECTION 
FPS = 047610, SRC = M7-Re, AC = ACO 
ETT eT Pee tri Peer erere yr eert Teer ert Tevet eer rrr TTT errr rer yer rrr ery 
SCOPE 
BR TSTS3 
125252 DATS3: 125252, 125252 
ADRS3: DATS 
047617 TSTS3: LDOFPS #047617 ;LOAD FLOATING POINT STAUS 
006670 MOV #ADRS3+2, Re LOAD Re 
177776 LDCFD d@-e(R2),ACO ‘LOAD-CONVERT 1éSe52, 125252 INTO ACO 
STFPS FPS :STORE FLOATING POINT STATUS 
047616 CMP #047610, FPS ; CHECK FLORTING EQINT STATHE 
BEOQ +4 : BRANCH 
HLT FPS NOT EQUAL TO 047610 
172060 STD aco ANS! :STORE ACO IN ANS! THRU ANS 
006670 CMP #AORS3+2, R2 :C R 
BEQ :BRANCH IF OK 
HLT :Re NOT EQUAL TO #ADRS3+2 
1eS252 172042 CHP #125252, ANS! :DID. 125252 GET STORED? 
HLT+4 ‘BNE! Nenot EOL EQUAL TO 125252 
125252 172032 CMP wi2s252,AanS2  ;DID Lesese GET STORED? 
BEQ +4 BRANCH IF OK 
HL T+4 :ANS2 NOT EQUAL TO 125252 
172024 TST ANS3 :DID ZERO GET STORED? 
BEQ +4 :B 
HLT +4 :ANS3 NOT EQUAL TO ZERC 
172016 TST ANS4 :D1D ZERO Ger STORED? 
BEQ +4 : BRAN 
HL T+4 : ANSY Not EQUAL TO ZERO 
lla ahs ar eC et lel 
TEST cu: TEST LDCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
; “47615 GETS ASSEMBLED as 144072 
; Lond Tyig7e <-> 144072, 000000, 900099, ood000 
: PS = 047810 -R? Ac = acl 
; FOTOS ED OR. SR. EE: EB ite 
SCOPE 
047617 TSTS4: LDFPS #047617 ;LOAD FLOATING POINT STAUS 
144072 LOCFD  #-47615,AC1 ‘LOAD-CONVERT -47615 INTO ACL 
STFPS FPS _ tSTORE FLOATING POINT STATUS 
047610 CHP #047610, ,FPS ; CHECK AFLOATING POINT STATUS 
HLT : FPS NOT EQUAL TO 047610 


171754 STD ACl, ANS! ;STORE ACL IN ANS] THRU ANSY 


ne eows cere o- 


007050 
0070S4 
007956 
007060 
007064 
097066 


007070 
007072 


007074 
007100 


007 1e 
007122 
007126 
007134 
007136 
007140 


007152 
007156 
007160 


007170 


1401 
104004 


005767 
001401 
104004 


005767 
001401 
104C04 


005767 


001491 
104C04 


104400 
000402 


040125 
170127 
1 7 


104004 


005767 
001401 
104004 


005767 
001401 
104004 


TEST OF LDCDF, LDCFD, STCFD, STLOF MACY11 27(732) 17-SEP-76 10:46 PAGE 29 
TEST SECTION 


144072 171746 cre #144072, ANSI sDID 144072 GET STORED? 
HLT+4 "ANSI NOT EQUAL TO 144072 
171740 TST ANS2 sDIO ZERO GET STORED? 
BEG +4 :BRANCH IF OK 
HLT+4 *ANS2 NOT EQUAL TO ZERO 
171732 TST ANSS sD10 ZERO GET STORED? 
HLT+4 *ANS3 NOT EQUAL TC ZERO 
171724 TST ANS ;DID ZERO GET STORED? 
BEQ +4 ‘BRANCH IF OK 
HL T+4 ‘ANSY NOT EQUAL TO ZERO 
j EER ERK RR RAA ELAS ELLER ELE RERE LAER E ERLE EERE E EEE RARER ER REL ELAS RELL RL ER EES 
?TEST SS: TEST LOCFD (LOAD-CONVERT FLOATING TO DOUBLE) 
; LOAD — 040125,052525 --» O401eS, 052525, 000000 , 000000 
FPS = 047600, ° SRC = M3-R7 Ac= aCc3 
Pera eer Mert errr er ereer iris Peer rire Tr iter ere tT ttt tT tte Tt tert 
SCOPE 
BR TSTSS 
oS2525 DATSS: 940125,052525 
047617 TSTSS: LDFPS #047617 ;LOAD FLOATING POINT STAUS 
907074 LOCFD as#DATSS,AC3 *LOAD-CONVERT 040125,052525 INTO AC3 
STFPS FPS :STORE FLOATING POINT STATUS 
047600 CHP #047600, FPS : CHECK CK FLOATING POINT STATUS 
HL . i peaNCH NOT EQUAL TO 047600 
171654 STD Aca ANS1 ‘3° AC3_IN ANS! THRU ANS4 
040125 171646 CHF #040125, ANS] “DID yQuoles SET STORED? 
HLT+4 ‘ANS! NOT EQUAL TO 040125 
052525 171636 CMP #052525,ANS2 § ;DID 052525 GET STORED? 
BEQ +4 : BRANCH 
HLT+4 “ANS2 NOT EQUAL TO OS2525 
171639 TST ANS3 :DID ZERO GET STORED? 
BEG +4 BRANCH IF OK 
HL T+4 :ANS3 NOT EQUAL TO ZERO 
171622 TST ANSY DID ZERO_ Ger STORED? 
BEQ +4 : BRANCH 
HLT+4 !ANS4 NOT F EQUAL TO ZERO 


5 EERE EERE REL EE REE AREER ERAE EEE ERLE EER RE ER EE EERE REEL ERE EERE RARER ERATE 
TEST Sb: TEST LOCFD (LGAD-CONVERT FLOATING TO DOUBLE) 
: LOAD 140252, 12eS2Se --> 140252, 125252, 000000, 000005 


eT TT TT 


Me NoEssiie “OCF PIB +8: oF aity F, LOCFD, STCFD, STCOF MACYI1 27(732) 17-SEP-76 10:46 SAGE 4C 
we? Past od CTION 


FPS = 047610 SRC = M7-R7 


a Ac 
s sennanenabennecatetbonsheteunsnsebonnsedoccsttonseqnensenssonrnusesens 


oe7172 «104400 SCOPE 
557174 s004s3 BR TSTS& 
DOTI7E 140252 125252 , DATSe: 140252, 125252 
557202 O07i76 AoRSe: Oarsé 
oo7204 170127 047617 TSTS&: LOFPS #047617 ; LOAD FLOATING POINT STAUS ae 
pone tt 177477 177? bb : fFD agADRSE, ACD EO8D- CONVERT 140eSe, l2es262 INTO acc 
O97214 170200 FP tet ORTING POINT STATUS 
007216 O2e700 o47610 <p 8947610, FPS = CHECK FLOATING POINT STATUS 
32262 0014 BEG +4 :BRENCH IF OK 
, tac HLT :FPS NOT EGUAL TO 0476!0 

174067 171550 . S7D ACO, _ ANS!  — ;STORE ACO IN ANS] THRU ANS 
D07232¢ Oee7e7 140252 171842 MP aise 252,ANS!  :010 180252 GET STORED? 
007240 001401 BEG : BR NCH ut OK 
d07e42 104004 HLT +4 GNS1 NOT EQUAL TO 140252 

022767 i2S252 171832 oP g125252,ANS2 DID jesese GET STORED? 
OC72S2 90140! SEO 44 sBRANCH IF 
907254 04004 mT +4 ANS2 NOT EQUAL TO i2S2S2 
907256 00S767 17152 TST ANS +10 ZERO GET STORED? 
507262 901401 BG iw ANCH IF 
507264 104c04 HL Tos ANS3 NOT EQUAL TO ZERO 
007266 OCS7E7 17:55 TST aNS4 DID ZERO. se” STORED? 
9072872 90140! BEG + : BRANCH 
507274 S400 HLT +4 : ANSY NoF EouaL TO ZERO 

eee rete ttt ree ETCED (STORE-CONVERT FLOATING 10 DURE 
mh So é 


: T "ce (STORE-CONVERT FLOATI DOUBL. 
STORE ‘ 008 | =F d00c60, 05000, BJocde. fefalalalele 
FeS = SN7404. AC = mb-R7 


RE ACL, da 


So7276 104400 SCOPE 

007390 000402 BR TSS? 

0C7302e 00000 900000 DeTs7: 000000, 000000 

007306 170127 047417 TS757: LOFPS  sQ47417 s LORD FLOATING POINT STAUS 
0073i2 172567 177764 LDF DATS7, AC] ;LQAD 000000, 000000 INTO AC: 
237316 176167 171460 FPTS7: STCFD ACl, ANS 1 SET ORE- CONVERT AC] IN ANSI THRL ANSs 
I073ee 170200 STFPS FPS : STORE cL Oe ie BINT state S 
0073e4 Gee700 C47404 CMP 80474C4 , FPS ; CHECK FLOATING POINT STATUS 
2073 00149) BEG .o4 ;BRANCH IF OK 

JU733e 104000 HLT :FPS NOT EQUmL TO O47HO + 
Oo73a4 22767 OCOo00o 171440 CMP sOCC000 ANS: :010 900800 GET STORED” 

wer ete §=U140) SE 4 :BRANCH IF Ok 


OC7 4s §«=61ONODM nLT+4 sANSI “NOt 5 5UAL TO 900005 


MAINES $i 1-OCF PT <8 TES’ OF bor e LOCFD, STCFO, STCOF MACYI1 27(732) 17-SEP-76 10:46 PAGE 4) 


ScFPT.F2) TEST SECTION 

OO7S4 022767 O00000 171430 MP s000000,ANS2  ;DID 900000. GET ST “8E0" 

oo7354 991401 Ee +4 : iF gk 

Ba735_ 104004 HLT +4 + ENCO No? EQUAL TO OCOCSC 

207360 O0S767 171422 TST ANS2 :D1 ZERO GET STORED” 

907364 901401 EQ +4 ;8R H IF 9 

Bec3ce «104004 HLT +4 BAe NO FOuAL TO ZERO 

27375 OOS"? I71414 137 ANS DID ZERO go STORED? 

Ber376 1 Osod4 HLT+4y sBRANCH NOT EQUAL TO ZERO 
s SRASEKSRSLERSSSSLELSASFSSSSELEAFLSSESSSSLSLSSLELLASLSSHSSSSSSSAASA SIF F4 
:TEST 60: TEST STCFD (STORE-CONVERT FLOATING TQ DOUBLE) 

STORE pues Se 5 os 852 42 SeS25, 200000,0 ocedds 
aE a TO a ES SOL aR ee 
- Oc7400 104800 SCOPE 
| B674d2 sdo4de BR TST60 
, DO7HO4 oOS2525 os2525 DAT&O: OS2525,0S2S2s 

OO74i0 170127 oO47417 TS7E0: LDFPS 8047417 sLOAD FLOATING POINT STAUS 

607414 172667 eT LOF BATE, Ace SToee eonve 9523¢5 INTO AC2 

OO7420 176267 171356 Fe1é0: STCFD AC2, ° ANSI = ;STORE-CONVERT ACS IN ANS] THRU ANS 

So7424 175290 STEPS OFS STORE FLOATING POINT STATUS 

oo74eb 326700 p47400 si #047400, FPS : EME CK At QATING PCINT STATUS 

é S 
104 : HLT FPS NOT EQUAL TO C4740 

207436 922767 os2s25 171236 cue 8052525, ANS! :DID Ose52S GET STORED? 

+S J :? 

B57446 104004 HL T*4 TANSL NOT EQUAL TO OS2S25 

OO7450 022767 OS2525 171326 CMP e0S2525,ANS2 =; DID gs2526 GET STORED? 

07456 901401 BEQ 44 : BRANCH 

Ba74—5 104004 HLT +4 :BNSe NO Fe SbaL TO oS2s25 

o7462 OOS7E7 171327" TST ANS :DID ZERO. GET STORED? 

AAeyure SOL HOi REQ +4 : BRAN 

807570 0404 HLT +4 ey” NO Fab AL TO ZERO 

OS747e OOS7E? 171312 TST ANS OID ZERO GET STORED? 

927476 50149: 259 +4 ‘BR F OK 

Sévson «154004 HL T+ : NSH NO? EQUAL TO ZERO 


igegeeseessesenoenecnesasvensssnuanssaeseanessusananessasenscnsassorees 
TEST 61; _ TCFD_(STORE-CONVERT FLOATING TO DOUBLE. 
A jeeese. Les lesese aca. leS2Se2 aegrerae 28 099000, 000eu2 


. en TE) IL S.A 


MOINDES-11-DCFPI-8 TEST OF LOCDF. LDCFD, STCFD, STCDF MACYLL 27(732) 17-SEP-76 10:46 PAGE 42 
acFey Ey} TEST SECTION 

oc7so2 194400 SCOPE 

dé7504 ooo4de BR TSTb1 

o07S06 125252 125252 DATE1: 125252, 125252 

07512 170127 o47417 TST61: LOFPS 8047417 sLOAD FLOATING POINT STAUS 

BO7SI& «l7e7e? TT TéH LOF DATBi, AC iL ORD lese5e 125252 INT AC3 

357522 «4176367 «171254 FPI61: STCFD AC3, ANSI STORE-C AT AC3 1 steht THRU ANS 

557526 179200 STEPS FPS FLOATING BarAt stat 

557530 Sesro0 oO47410 Mp #047410, FPS iaeck FLOATING POINT STA 

Reaeae anni BEQ 4 ;BRANCH IF OK - 

OU: 1040 HLT EPS NOT EQUAL TO 547412 

DO7540 922767 12S2S2 171234 cue #125252, ANS! :ID 12 GET STORED? 

secece ised Htoy TANS NOT EQUAL TO 125252 

no7sse Gee7e? 125252 171224 Me ei25252,ANS2  ;:DID 12se52 GET STORED? 

597569 90140: 5E9 44 : BRANCH 

bé7S62 194004 HL Tou TANS2 NOT Fe StaL TO 125252 

OC7Sb4 OOS7E7 71216 TST ANS3 :DID ZERO GET STORED’ 

607570 001401 BE9 +4 BRANCH IF OK F 

007572 354004 HLT +4 “ANS3 NOT EQUAL 70 ZERC 

907574 905767 1712:2 TST ANS DID ZERO. GET STORED? 

597600 961401 chee +4 BRANCH IF OK 

Berese 154004 Hi Tos TANS NOT EQUAL TO ZERO 
TEST 62; TEST STCEL (STORE-CONVERT FLOATING 10 DORE, 
TEST & ORE-CONV LORT 9 
: STORE ghfsob, Banas = =-) abc286, gpbta, agodbo. SHEA 
FOI KN a A SN NN, 5 AE A 

207604 104400 SCOPE 

SE7ede 800402 BR TSTb2 

007610 900200 gecoce oeT62: 000200, 00000¢ 

OC7614 170127 O47417 TST62: LDFPS #047417 ;LOAD FLOATING POINT STaUS 

Sc7e20 172567 177764 - COF DaTbe, AC! LOAD 000200,000009 INTO Ac: 

7 176167 17115z FPibe: STCFD AC], ANS! ey ORE-CONVERT A Aci IN ANS] THRU ANSS 
597630 170200 STepS CFP STORE FLOATING EOIN STATUS 
Be7632 622700 o47400 Emp eC474O0, FPS :CHECK FLOATING POINT STATUS 
307636 O0140! BEG +4 :BRANCH IF OK 
5é7640 104000 HLT “FPS NOT EQUAL TO O474OC 
novewe 022767 oCCcelS 171132 CMP #000200,ANS! ;DID ogd200 Ser STORED” 
567E50 061491 ge +4 “BRANCH IF © 
RS7E5e2 C4004 HL T+4 :ANS1 NOT ESUAL TO go0200 
OO7ES4 222767 OCCOCD i7l1z2 mp sOCCO00.,ANS2 = ;DID gacg03 cer STORED? 

“F7ete §=GO!40) BEG 44 :BRANCH IF 


we bee 3 UMSOS HL Tos ;RNSE NOT SUA To SCCooe 


“RIND f.- ai “ClFPI-5 


~ Sore! 


a Pe’ 


coer 


a Bad 
wewwew 


~ewwe 


aed 


104004 


104405 
OOS402 


100200 


Pete? 


176367 


104004 
095767 


ern 
——— 


ocoo0c 
047417 
177754 
171950 
O47410 


109200 


heen’ LOCFD, STCFD, STCOF MACYI1 27(732) 17-SEP-76 10:46 PAGE 42 


TST ANS3 sOID ZERO GET STORED? 
BEQ +4 : BRA NCH OK 

HLT+4 :ANS3 NOT EQUAL TO ZERO 
TST ANS4 ;DID ZERO GET STORED’ 
BEG +4 :BRANCH IF OK 

HLT +4 sANSY NOT EQUAL TO ZERO 


oer eae TEST STCED (STORE-CONVERT FLOATING TO DORE) 
STEST 62: TCE (STORE-CONVERT FLOATING T .E) 
; STORE {Bbe08, Sots gy, tote ,gpebes a Sega, shicatte 


PSE AD EL Saree, o_o 


SCOPE 
SR TST&3 


AT&3: 100200,000000 


TST63: LPEPS BOHN? a9 io 1oBe08,Goo860 1h Acs 


FPIE3: SiceD BC. ANS! RE co BNS! THRU aNS4 

ee #097410, FPS ie Hale "Baht Tate 
9 + 

HLT ‘Bee NOT TF OAL TO O47410 
CMP #100200.ANS! § :DID 100200 GET STORED’ 
BEQ +4 i BRANCH IF OK 
HLT +4 ANS! NOT EQUAL TO 100200 
eh ecoooco.ans2 § :DID googg0 GET STORED? 
BEG +4 “BRANCH IF OK 
HLT +4 SANSe NOT EQuaL TO OOCOCo 
TS? ANS3 DID ZERO ser STORED” 
REQ +4 : BRANC 
HLT +4 : ANS3 NOT EQUAL TC ZERO 
TST ANSH :DID ZERO GET STORED” 
BEG +4 : BRANCH 
HLT +4 [ANSH NOT EQUAL TO ZERO 

Eh hall hhtahahahahah tabbed hbbhaind tbh tad bphetinbnd tad -baddnt-b- herded tal hte baln dala lalalialalalel 

:TEST 64: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE) 

STORE _ 900177,177777 --» 00000, 9008S Goo00e  coacda 
FeS = 047404, ° AC = ACD. hs? = Mb-R? 

| FEESERESS PREFER RRESEPEOSLEESFARESESEADESEREASESEESDESESALSSSEEE SESE ESE 
SCOPE 
BR TST&4 

DaTé4: 000177177777 


MAINDEC-11-OCFPI-8 TEST OF LOCOF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 19:46 PAGE 44 
ScFPY 82} TEST SECTION 
919020 17 op9900 TST&4: LDFPS ;CLEAR FLOATING POINT Tats 
ston 12 oBlgs Tes LDF Gare aco :ChERR : 006177 NG ES 77" int INFO Ae 
108 , 7417 474 
se bepaes 170742 FPIEM: EEF ACO, ANS! pew ReAV ih bean IN A ie THRU ANS 
Bi0040 175200 STFPS FPS RE FLOATING POINT S 
o:oc4e 022709 o4T4o4 CMP #047404, FPS CHE FLOATING POINT STATUE 
*35546 001401 BEG +4 : BRANC 
3100s5 104000 HLT :FPS NOT EQUAL TC 047404 
910052 O0S7&7 170724 TST ANS 1 :CHECK ANSI 
5:5058 301401 BEQ +4 :BRANCH IF OK 
5i0065 14004 HL T+4 “ANSI NOT EQUAL TO 90017 
610062 OOSTE7 170716 TST ANS? : 
gi DORE Brae go +4 ‘ber At 
9100702 104c04 HL T+4 : ANSE Not FOCAL TO 177777 
910972 05767 170710 TST RNS3 :DID ZERO Ger STORED” 
5:5076 001401 BEQ 4 :BRANCH IF 
5idi00 104004 HLT +4 16453 NOT EQUAL TO ZERO 
o:o192 905767 170702 TST NSH :DID ZERO GET STORED? 
Sidise 661461 REQ +4 : BRANG K 
Srdi:0 104054 HLT +4 : NSH NOT EQUAL TO ZERO 
: » SGUSReGensEOnesenscnneneneneeseosnnenasecenenpesennenenensenenesenesess 
TEST 65: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE) 
: STORE 100165, 12262 --» So0000, 996000, coc0ca, So0000 
: PS = on7404, "AC = aCe OST = M&-R? 
2 ROR cc BS i, 0 ME RI, STO, 5 RE 
O1DLi2 104400 SCOPE 
Sinii4 Coosde BR TSTES 
D1D116 100165 125252 DATES: 100165, 125252 
Sigiee 170327 sus 90 TST6S: LDFPS 80 ‘ :CLEAR FLOATING POINT STATUS 
Bidies 172667 177764 LOF DATES, Ace SLOAD 105165 leS252 INTO Ace 
515132 170127 ON74I7 7 LOFPS = #Q474i7 _ : LOAD FLOATING POINT. sTaus 
Oi6:36 176267 170640 FeTes: STCFD AC2, ANS! = ;STORE-CONVERT ACe IN ANS] THRU ansH 
Sidi42e 170200 STFPS FPS :STORE FLOATING POINT STATUS 
010144 022700 o47404 CMP 8047404, FPS : CHECK gFLORTING POINT StaTLs 
5i5iso 80:40i BEG +4 : BRANCH K 
615152 104900 LT :FPS NOT EQUAL TO C4744 
C1i01S4 OOS7E7 170622 TST ANS 1 : CHECK fish 
STD1e0 901401 BE +4 BRANCH IF OK 
Bidiee io4004 HL T+ ANS] NOT EQUAL TO iCC1ss 
SICI64 COS7E7 170614 TST GNS2 : CHECK ANSE 
e517 801401 BEG 44 :BRANCH IF OK 
erdi7e yo4o04 HL T+4 TANS2 NOT ESURL TO 1285252 
S5174 SOS7E? i70e0e TST ANS3 :DID ZERO GET STORED” 


MeINDE Ce Ll-DCFPI<8 
OcPPr Pil 
s:9200 991401 
abtei-ial Teaces 
229204 905767 
ei vel 901491 
witele 1040) 
PLOZIS 1o4s8oo 
Cig2i& 9004Ce 
Sid220 o4c000 
019224 170127 
018230 172667 
010234 176267 
C10e4%O 170200 
Cl0de42 Gee7 
Oide4%6 9001401 
01deS6 104098 
O10eSe 022757 
010260 001401 
Oi0ebe 104004 
0:0264 022767 
Cl027e 00140) 
C15274 104004 
010278 9057&7 
O1030e 601401 
Oi0304% 104004 
518306 305767 
ulo3le aoT4o! 
S10334 1oso004 
eicsl& 104400 
E32 25a ]Fz 


TEST o£ GOCOF, LOCFD, STCFO, STCOF MACY1L 27(732) 17-SEP*76 10:46 PACE 4¢ 
; St lal 


170609 


ooco90 


170594 


19279 
L704: 


wee ewww 


BE +4 ; BRANCH iF OK 
HLT +4 :ANS3 NOT EGUAL TO ZERC 
TST ANS4 :D1D ZERO GET STORED? 
BE: +4 sBRANCH IF OK 
HLT +4 ANS NOT EQUAL TO ZERO 
oar spameaaage harcore ema re op or nani 
; TEST SE: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE) 
: pLone owe one ary =. 040000 we ae . JUCOES 
SRE EL PRIX SO AL, ARE 
SCOPE 
me TSTbE 


DAT&é: 940000, 000000 


TST6B: hers 8047417 ;LOAD FLOATING POINT STAUS 


L DAT&E, AC2 : ORD 040000 90000 Into ace 
FEIGG: STCFD Ce. ANS 1 :STORE-CONVERT A ANS! THRU ANS 
STEPS FPS : STORE SOO ING” Seat STATUS 
CMP 8047400 FPS :CHECK FLOATING POINT STATUS 
BEG +4 “BRANCH IF OK 
HUT :FPS NOT EQUAL TO 047400 
CMP e040050,ANS! ;DID 940000 GET STORED? 
BEG +4 : BRANCH IF 
HLT +4 :ANSL NOT EQUAL To o4ococ 
OMB #09090, aNs2 DID ggo0ge GET STORED? 
859 +4 “BRANCH IF OK 
HLT+4 sBNee” NOT EQUAL To ocooos 
TST ANS? :DID ZERO GET STORED? 
3&9 +4 : BRANCH K 
HL 7+ :ANS3 NOT EQUAL TO ZERO 
TST ANS :DID ZERC GET STORED? 
BEG +4 :BRANCH IF OK 
Hi T+4 "ANS4Y NOT EQUAL TO ZERO 
s SSSSERELSSSSSSLALELELSSSALAFLAELALLLAFLERLAERALASLERLERARERESASALSLSAPLA4 
TEST 67: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE? 
: STORE 140900, o99000 --> 149000, 95000 ecoada, §0999¢ 
. FPS = O474I10, AC = ACL bST = Mb-R? 
BR SB IR ECL. aE ates 
SCOPE 
he TST? 
DATS?: 14000C,900000 
TSTE7: LOFPS sO47417 sLOAD FLOATING POINT STAUS 


ane 


mteth*ss 


. L1i-DOFPI<8 


CoO0nononn 
ee et et et 


Remain 
RUE Aek 


alels) 
Se 
£ 


-b--b + 


ce £LE ty 
5 #28 o& 


Oonmod 200 tooo 
rer 


-b-<+b=< 
O00 80oO 


2 


et ol al nl 
~ewwow 


14400 
oo04ce 


109080 


170127 
eet 


001401 
104000 


005767 
001401 
104004 
0057&7 


007401 
104004 


ee 


ies oF ot BLOF . LDOCFD, STCFD, STCDF MACY11 27(732) 17-SEP-76 10:46 PAGE 4€ 
Vial: 


127764 LOF DATE7, ACL >LOAD yar ae ee AC] 
17o440 FPI67: STCFD ACI, ane : STORE-C ONVERT AC ANS] THRU acs 
STFFS FPS :STORE FLOATING gt AY STATUS 
047410 CMP 8O47410,FFS ; CHECK ¥ OATING POINT STATUS 
BES +4 -BR F OK 
HLT sFPS NOT EQUAL TO 047410 
140000 170429 CMP #140000 .,ANS1 sDIO 140000 GET STORED? 
Sep w 44 ;BRANCH IF OK 
HLT +4 ;ANS! NOT EQUAL TO 140000 
ogoces 170419 CMP #000008, ANS2 ;BID poo st STORED” 
BEG +4 : BRANCH 
HLT+4 ;ANS2 NOT FOU AL TO 908006 
170402 TST ANS3 ;DID ZERO GET STORED’ 
BEG +4 ;BRANCH IF OK 
HLT +4 > ANS3 NOT EQUAL TO ZERO 
170274 TST ANS4 sOI0 ZERO GET STORED” 
BES +4 :SRANCH IF OK 
HL T?+4 : ANS4 NOT EQUAL T TO ZERC 
< SLEREEEERSESESSEEE SESE SES ERESRESEESEEEA EE SEAEAEESESESESES SSS ESSE EF4ES44 
: TEST 703 TEST STCFD (STORE CONVERT FLOATING TO DOUBLE) 
3 A ows an , 000000 ca. 000009 a OS 009000 , S00826 
lnsheteankanstonnioiaimstenssttinianetaosobaninniioniabnenanies 
SCOPE 
BR TS770 
ooocoo cet70: 100000,o06900 
000909 TST70: LOFPS 20 :CLEAR FLOATING POINT STATU 
177764 LOF DAT7O, AC3 : LORD poor SONT INTO AES 
047417 COFPS § 8047417 360 TING P STAU 
179332 FPI7O: STCFO Aaa, ANS} ORO KOnveRS aca In ANS1 THRU SNSs 
STFPS FP i STORE FLOATING POINT STATUS 
047404 CMP BOS74O4, FES ; CHECK BLT INe POINT STATUS 
BEG +4 : BRANC H IF OK 
HLT :EPS NOT EQUAL TO 047494 
170314 TST ANS] sCHECK ANS! 
BEG +4 sBRANCH IF OK 
HLT +4 : ANS! NOT EQUAL TO 180058 
170206 TST ANS sCHECK ANS2_ 
BEG +4 :SRANCH IF Ok 
HLT+4 >ANS2 NOT EGUAL TO 90Co9o 
170305 TST ANS2 ;0ID ZERO MY STORED? 
BES +? : BRANCH IF Ok 
HLT +4 *ANSS NOT EQUAL TS ZERC 


TEES: L1-DOFPI-8 TEST of ao: LOCFD, STCFD. STCOF MACYIL 27(732) 17-SEP-76 10:46 PAGE 47 
. ae tS: 
010512 aed 170272 1st ANH ;DID ZERO GET STORED? 
i ‘ . | _ +i 
sikea8 star ai are :BRANC Hof? Edt: TO ZERO 
s sougagaonnenenepseseessesesezesserscevegegeezecsdsseserssparecenecaces 
TEST 71: TEST STCFD (STORE-CONVERT FLOATING TO DG 
: STORE 177777, 177777 --) 177777,177777, OGOOUD, foes 
FPS = O47410, AC = AC ST = Mb-R? 
 sspnnetnokens boned dbaneabensenebonniansbonessonannensnnsedunsbenensents 
S10S22 104400 SCOPE 
5idse4 soos BR TST71 
010Se6 177777 177777 DAT71: 177777,177777 
610532 170127 o47417 TST71: LOFPS #047417 sLOAD FLOATING POINT STAUS 
610536 172767 177764 LOF DAT71, ACc3 :(OAD 177777,177777 INTO ACS 
010642 176367 170234 FPI71: STCFD ACS, ANSL § :STORE-CONVERT AC3 IN ANS] THRU ANSS 
010546 170200 STFPS sFP STORE FLOATING POINT STATUS 
510550 o474:0 CMP 8O47410, FPS :SHECK FLOATING POINT STATUS 
510554 001401 BEQ +4 : BRANCH H IF OK 
o10556 000 HLT FPS NOT EQUAL TO 0474!0 
$10S80 O22767 %$177777 170214 CMP 8177777, ANSI sOID 177777 a STORED? 
510566 0140: SFO - +4 : BRANCH 
919570 104004 Hi T+4 “ANSI NOT EQUAL TO 177777 
010572 022767 177777 17020 CMP 8177777,ANS2  :DID 177777 GET STORED? 
619690 001491 BEG +4 : BRANCH I 
610602 104004 HLT +4 :ANSe NOT EGUIAL TO 177777 
S1D604 O0S767 170176 1ST ANS3 :DID ZERO GET STORED? 
610610 001401 BES +4 “BRANCH IF OK 
Cideéie 104004 HLT +4 "ANS3 NOT EQUAL TO ZERO 
910614 90S7&7 170170 TST ANS4 DID ZERO. GET STORED? 
515620 901401 BEG +4 : BRANCH 
Sidbee 108904 HLT+4 : ANSY NO * BUA TO ZERO 
ee eee eee er eTCED (STORE-CONVERT FLOATING 10 DOBLE) 
:TEST 72: i ie (STORE - ONVERT FLOATING TO DOUBLE) 
STORE sHfes ebase --> SadeSe, 1eSeS2, og0d0, 090009 
FPS = 047400 ace, Ost = mO-aco 
ER Ee, UT TR AOL 5, RR ee 
cipse4 104409 SCOPE 1 
Side2e o0048e BR TST72 
010630 o4deS2 i2s252 DAT72: o40252, 125252 


CiQ&s4 170127 47417 TST72: LOFPS #8047417 ;LORD FLOATING POINT STAUS 
O1064C 172667 177764 LDF DAT72, ac2 “EAAN OYNZS2 125252 INTC ace 
Ci0644 176200 STCFO = AC, ACO :ETORE-CONVERT ACe IN ACS 
S104 170200 STFPS FPS » STORE FLOATING POINT STATUS 


MRINDEC-11-DCFPI-B 
Pil 


DOFPT 


acta 


010712 
010714 


010720 
010722 


itera 


019732 


910734 
010736 


010740 


_ O10744 
0 


104004 


neil 7 


104904 


104490 
300402 


140125 


001401 


104000 


022767 
001401 
104004 


022767 
001401 
1049004 
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047400 


170114 
040252 


l2eS2S2 


170066 


170060 


052525 


047417 
177764 
001002 


047410 


001002 


170104 


170074 


140125 167770 


MACY11 27(732) 
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pa Se wa POINT STATUS 
;FPS NOT EQUAL TO 047400 


;STORE ACO IN ANS! THRU ANS4 


;D1D ea GET STORED? 
;BRANCH IF _OK 

ANS1 NOT EQUAL TO O402S2 
;DID 125252 GET STORED’ 
;BRANCH IF OK 

;ANS2 NOT EQUAL TO 125262 
;DID ZERO ML STORED? 
;BRANCH IF 


:ANS3 NOT EQUAL TO ZERO 


BIR AE, STOR 


;ANS4 NOT EQUAL TO ZERO 


re rater eet p neteen te ee seen 
: ST_STCFD (STORE =CONVERT FLOATING TO DOUBLE? 


CMP #047400 , FPS 
BEG +4 
HLT 
SETO 
STO Aco, ANS1 
SETF 
CMP #040252, ANS! 
BEG +4 
HLT +4 
CMP a#icS2S2,ANSe 
BEQ +4 
HLT+4 
TST ANS3 
BEG .+4 
HLT+4 
TST ANS4 
BEG +4 
HLT+4 
TEST 73: TE 
$ STORE hee O5eSeS --) 
: FPS = 047410, co 
BS we 
SCOPE 
BF TST73 
DAT73: 140125,0S52S2S 
TST73: LOFPS #047417 
LOF D ,» aco 
OV BANS], RS 
etcee af 3 (RS) 
TFP F 
CMP #047410, FPS 
BEQ +4 
HLT 
CMP #ANS1, RS 
BR .+4 
HLT 
CMP #149125, ANS! 
BEG +4 
HLT+4 
CMP #052525 ,ANS2 
BEG +4 
HLT +4 


140125, 052525, 000000, 000900 
Ost = Mi-Rs 


LeReeEeeeeEEERREEESAEOREEEAREEEEEEOESOREE 


;LOAD FLOATING POINT STAUS 
;LOAD 140125,952SeS INTO ACO 


STO PORATED eB I 
ERA 4 FLOATING POINT STATUS 


NCH _IF OK 
:FPS NOT EQUAL TO O47410 


pa Se 7 
BRANCH IF OK 
:RS NOT EQUAL TO #ANS1 


;D10 psoies GET STORED’ 
;BRANCH IF Ok 
SANS 1 “MOT EGUAL TO 140125 


;01D OS2SeS GET STORED’ 
:BRANCH IF OK 
:ANS2 NOT EQUAL TO OS2S25 


MRINDEC=1 
OCFPT.PLi 


ooo oO0OoO 

b-- bp he 

et ee, ee ee ee 
B 


011054 


23e8 


SR BRS Sz6 RES 


+ 
iat) 


Ooo O00 OOO O00 O00 DOHOOO0O000O 
ey ey er ary ere ra ery eed a ee ery eae eed ony or — b— = bs bo 9 pe 
uw 
NOt 


ST TE ey eek eed) ed ed ed et ed on) 


row 
Mos 


-OCFPI-8 


104004 


104400 
00040e 
OS2S2S 
170127 


022702 
001401 
104000 


022767 
001401 
104904 


022767 
001401 
194004 


To4b4 


005767 
001401 
104004 
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TEST SECTION 


1877 TST ANS3 :DID ZERO GET STORED? 
BEQ +4 ;BR K 
HLT +4 :ANS3 NOT EQUAL TO ZERO 
167744 Ist ANS :DID ZERO GET STORED? 
HLT+4 *  =ANS4Y NOT EQUAL TO ZERO 
STEGT 74; TEST STCED (STORE-CONVERT FLOATING T0 DOLE) 
: TEST 74: SL STCe ea gonve FLOATING 50 Doug LE 
; STORE 9 =-) 052525 gs Se, 9090 isle 
 sameraal ears,” BC = ACS, DRT ROR saneearane 
SCOPE 
BR TST74 
os2s25 DAT74: 052525, 0S2S25 
047417 TST74: LDFPS #047417 sLOAD FLOATING POINT STAUS 
7764 LOF DAT74, AC3 ‘LOAD 952525,0S2525 INTO ACS 
nats MOV wANSL’ RO 
STCFD C3, (Re)+ : STORE-CONVERT ac3 IN aN ru ANS4 
STFPS FPS :STORE FLOATING POINT STAT 
047400 MP #047400, FPS :CHECK FLOATING POINT eraThe 
BEQ +4 BR ANCH IF OK 
HiT *FPS NOT EQUAL TO 047409 
901012 CMP #ANSS, Re sCHECK R2 
BEQ +4 :BRANCH IF OK 
HLT "Re NOT EQUAL TO sANSS 
oS2525 167654 CMP #052525,ANS1 ;DID OS2S2S GET STORED? 
BEG +4 BRANCH IF 
HLT+4 :ANSL NOT EQUAL TO OS2S25 
oS2525 167644 CMP 80S2525,ANS2  ;DID OS2S2S GET STORED? 
BEQ +4 :BRANCH IF OK 
HL T+4 :ANS2 NOT EQUAL TO OS2S25 
167636 TST ANS3 :DID aeRO GET STORED? 
BEG +4 ‘BRANCH IF OK 
HLT+4 :ANS3 Not EQUAL TO ZERO 
167630 TST ANSY ;DID ZERO GET STORED? 
BEQ +4 : BRANCH 
HL T+4 ANSY NOT EQUAL TO ZERO 
UHHH HEHEHE HHS HIE GHEE EGE HEHEHE 
“TEST 75: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE) 
: STORE ease, , 125252 --> 125252 dese52 ,00 090000, o00dd0 
: FPS = 04 AC = ACO Ost = M3- 


FOE AA am ES ROR, IN: RS Ee ES 


MAINDEC-11-DCFPI-B TEST OF LOCOF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE SO 
DOCFPI.P11 TEST SECTION 


011164 104400 SCOPE 
611166 000403 BR TST75 
011170 125252 125252 DAT7S: 125252, 125252 
011174 001002 ADR75: ANS! 
011176 470187 pur ? TST7S: LDFPS #047417 ; LOAD FLOATING POINT STAUS 
Blige ee? Wie OE Bae” Reo raMaeeee IED oo 
( 
ee 176031 LOfey 8 ACO, BB ha ie 1ERE Seat see? N BNSL PRU GNS4 
011014 170200 STFPS FPS RE FLOATING BOInT ATUS 
611216 022700 947410 CMP 8047410, FPS HECK AFLOAT ING POINT erate 
Oile22 001401 BEQ +4 !BRANCH IF OK 
611224 104000 HLT -FPS NOT EQUAL TO 047410 
011226 022701 011176 CMP #TST75, RI :CHECK RI 
Olile32 O01401 BEQ etry. :BRANCH IF OK 
011234 HLT ?R1 NOT EQUAL TO s#TST75 
011236 022767 125252 167536 CMP #125252, ANS] sD1D jese5e G GET STORED? 
011244 001401 BEQ +4 ANCH 
011246 104 HLT+4 'ANS1 NOT EQUAL TO 125252 
011250 022767 125252 167526 CMP #125252,ANS2  ;DID 125252 GET STORED? 
011256 op 1401 BEG +4 : BRANCH 
011260 104004 HLT +4 :ANS2 NOT EQUAL TO 125252 
011262 O0S767 167520 TST ANS3 :DID ZERO GET STORED? 
011266 001401 BEQ +4 : BRANCH 
011270 104004 HLT +4 :ANS3 NOT EQUAL TO ZERO 
011272 005767 167512 TST ANSY :DI0 ZERO. GET STORED? 
6i1276 001401 BEQ +4 : BRA 
011300 104004 HLT +4 : ANSY Nor EQUAL TO ZERO 
5 KEKAAEAAALESAAALAAAL ALAA AAR ELA K AAA EAL AEREEE KEL ELLA RALAELARLAA RAL AAAARLE 
TEST 76: TEST STCED_ (STORE-CONVERT FLOATING TO DOUBLE) 
; STORE  Q40eSe, leSeS2 --> O4deSe, 1eSeS2, 000000, 000000 
FPS = 047400, AC = aco, OST = M4-R6 
|S UHHEH HEHEHE EEE HEE: USB HHE HEHE HEEB EEE HEHEHE 
011302 104400 SCOPE 
011304 600493 BR TST76 
011306 o4o252 125252 DAT76: oO402S2, 125252 
011312 ooc000 SAV7E: O 
011314 170127 047417 TST76: LDFPS 4047417 ;LOAD FLOATING POINT STAUS 
011320 010667 177766 MOV SAV76 Y 
911324 172467 177756 LOF pate, ACO ‘TOAD 040252, 125252 INTO ACO 
611330 176046 STCFD -(%)  :STORE-CONVERT ACO IN ANS] THRU ANSY 
011332 170200 STFPS FP 6e. :STORE FLOATING POINT STATUS 
011334 622700 o47400 CMP #047400, FPS ; CHECK FLOATING POINT STATUS 
011340 oogl4oi BEG +4 : BRANCH 
Silzye 194096 HLT -FPS NOT EQUAL TO O474O0 


; 
ee ee a ner eens ee eee ow em ene es - 


a 
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Oo NINO 
oO TnVos 


hw oF 


TEE — b= be > b= b= b= b= & ~ pp 


O00 000 000 OOO DOOOO0O000 


ye ey es ne Sy a eee eee are = 9 —= ps pe pe pe 


Qo0o0 200 OOooooeeo oo OO 


TEST SECTION 


012667 167432 MOV (%&)+, ANS!  ;POP THE ANSWER 

12667 167436 MOV (4)+; ANSE} 

012667 167426 MOV (4B )+, NSS j 

012667 167424 MOV (46)+" ANSY 

? 177722 CMP %% SAV76 =; CHECK 
1403 BEQ TSA76 : BRANCH Ree OK 

010667 167414 MOV %b, ANSS  ;SAVE WRONG %& FOR TYPING 

104005 HLT+5 :STACK POINTER FORLED UP, NOT S00 

022767 O402S2 167374 TSA76: CMP #040252,ANS1  ;DID 040252 GET STORED? 

001401 BEQ +4 :BRANCH IF OK 

104004 HLT+4 “ANSI NOT EQUAL TO O40252 

022767 125252 167364 CMP #125252,ANS2 DID lesese GET STORED? 

001401 BEQ 44 : BRANCH 

104004 HLT+4 :ANS2 Not EQUAL TO 125252 

005767 1672356 TST ANS3 ;DID ZERO. GET STORED? 

001401 BEQ +4 “BRANCH IF OK 

104004 HLT+4 :ANS3 NOT EQUAL TO ZERO 

005767 167350 TST ANS :DID ZERO GET STORED? 

001401 BEQ +4 :BRANCH IF OK 

104094 HLT+4 ?ANSY NOT EQUAL TO ZERO 
¢ KLARA LA RELL LELELEAALLLERLALRALL LARA LE FELL LEE LLELELLLELELLL RRALLAAELELE 
TEST 77: TEST STCFD (STORE-CONVERT FLOATING TO DOUBLE) 
; STORE 140125,052525 --> 140125 ,0Se5eS, 00 oo00c0, o000d0 
Laesuesuusenaeraaibesahsessnisdaneaaaesireoa ene saeneaanessneaaaneSs 

104400 SCOPE 

000403 BR 1S177 

140125 oS2525 DAT77: 140125, 052525 

001002 ADR77: ANS! 

170127 047417 TST77: LOFPS #047417 ;LOAD FLOATING POINT STAUS 

012701 011456 MOV 8TST77, RI 

172467 177756 LOF DAT77,° Aco :LOAD 140125 o52526 INTO ACO 

176051 STCFD ACO, ’ @-(R1) ;STO VERT ACO IN ans! THRU ANSY 

170200 STFPS FPS TORE “FCORTING MPOINT STATUS 

022700 047410 CMP #047410, FPS :CHECK FLOATING POINT STATUS 

001401 BEG +4 :BRANCH IF OK 

104000 HLT FPS NOT EQUAL TO 047410 

022701 011454 CMP #ADR77, R1 ;CHECK RI 

001401 BEQ +4 :BRANCH IF 

104000 HLT :R1 NOT FOUR TO #ADR77 

022767 140125 167256 CMP #140125,ANS1  ;DID 140125 GET STORED? 

001401 BEQ +4 ‘BRANCH IF OK 


104004 HLT+4 ;ANS1 NOT EQUAL TO 140125 


—_——<--= ES A Tener 


C-11-DCFPI-8 TEST OF LOCDF, LOCFD, STCFD, STCDF MACY11 27(732) 17-SEP-76 10:46 PAGE Se 
Pll TEST SECTION 


911530 agi 7? oS2525 167246 cup wOS2525, ANS2 fia GET STORED? 

O11 HeT+y ANS2 NOT EQUAL TO OS2s25 
1154 167240 1ST ANS3 RO. GET STORED? 

piiaue antas BEu +4 BIR 75 a CE 

011550 104004 HLT+4 ANS3 NOT EQUAL TO ZERO 

011552 005767 167232 TST ANSY sO1D aero cet STORED? 

611558 001401 BEQ +4 HIF OK 

511569 104004 HL T+4 i BNGU NOT EQUAL TO ZERO 


HEHEHE HHH EHH TEER EEE 
:TEST 1005 TEST _STCF > ONVERT FLOATING TO DOUBLE) 
TORE roe oe SeS --> 040125, 0SeSeS , 000000, C0000 


FPS = 0474 ST = 
er Dg RT IT. =.) 


011562 104400 SCOPE 

011564 000402 BR TST100 

011566 O40i2eS OS2Se25 DAT100: 040125, 0S2SeS 

011572 170127 047417 TST100: LOFPS #047417 ;LOAD as POINT STAUS 
011576 Ol2e701 177645 MOV #ANS1-1135,R1 

01160e 172567 177760 LDF pATIGO, ack LOAD B40125 er, gh i 
011606 176161 001135 STCFD ACI, 1135(R1) ;STORE-CONVERT N ANS] THRU ANSY 
Olléle 170200 STFPS FPS : STORE FLORTING BOINT STATU 
011614 022700 047400 CMP #047400 , FPS :CHECK FLOATING POINT eraTus 
O0116e0 001401 BEQ +4 BRANCH IF OK 

Ollé2e 104000 HLT FPS NOT EQUAL TO 047400 
011624 022701 177645 CMP #ANS1-1135,R1  ;CHECK Rl 

011630 001401 BEG +4 ;BRANCH IF OK 

O11 104000 HLT :R1 NOT EQUAL TO #ANS1-1135 
011634 G22767 O401eS 167140 CMP #040125, ANS1 ;DID 040125 GET STORED? 
Oll642 001401 BEQ +4 ;BRANCH IF OK 

011644 104004 HLT+4 SANS NOT EQUAL TO 040125 
011646 022767 OS2525 167130 CMP #052525, ANS2 ;DID 052525 GET STORED? 
011654 001401 BEQ +4 BRANCH IF OK 

O1i656 104004 HLT +4 ;ANS2 NOT EQUAL TO OS2S25 
011860 005767 167122 TST ANS3 ;DID ZERO GET STORED? 

011664 001401 BEQ +4 : BRANCH 

Ol1666 104004 HLT+4 sANS3 NOT EQUAL TO ZERO 
011670 O0S767 167114 TST ANS4 ;DID ZERO GET STORED? 

011674 901401 BEQ +4 ; BRANCH 

011676 104CO4 HLT+4 :ANSY NOT EQUAL TO ZERO 


5 REREEEEAEREEREE EERE RERAEEEREL ELE EERE AREA ELLER ERESRERA RARE RAAEARAR ERE REST 
;TEST i01: TEST STCFD (STORE-CONVERT FLOATING TO COUBLE) 


eee 


or 2 


Tt et et et ee oe 


ae we Goo 


29-9 o-+> +66 - &-- B= p< p< & -2 8 < p< H+ 


¢ 


o--b-o-- 


hes 


forororr Be ror 


C10 Co OOM 
ee eee oe 


CwW.1900O 


TES oF acOF LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE $2 
‘eS: Seu! 
: TORE 25,052525 <-> OS2525 soF2525,,00 099000, oocooa 
: PS = 04 oe AC = ACO 
Peel BK, ate. RO ON RO, AY, REI ea 
SCOPE 
an TST101 
os2s2s DATICI: OS2525, 0S2s25 
AORIOL: 
047417 soe iet: CNEbs 80474 sLOAD FLOATING POINT STALS 
004007 MOV SA0R141-5701, RY :LORD RY 
177756 LDF DaT101, ACO OAD 052525, gseses 1 aco 
005701 STCFD ACO, beoy rR) STR ONVERT AC IN aN S! THRU ANS 
STEPS = FPS FLOATING SSrit ast 4 
047400 mp #047400, FPS :CHECK FLOATING POINT STATUS 
8&9 +4 :BRANCH IF Ok 
HLT : FPS NOT EQUAL 70 047400 
004907 cmp BADRICL-S701,R4 ; CHECK Ry 
BEG +4 :BRANCH IF OK 
HiT :R4 NOT Fue TO @ADR10:-5701 
os2s25 167020 Mp 80S2525,ANS:  ;DID g52525 GET STORED? 
BE +4 : BRANCH 
HLT +4 : ANS | Not EQUAL TO OS2S25 
oses25 e700 CMP s052525,ANS2 —-: DD OS2525 GET STORED” 
BEG 45 :BRANCH IF OK 
HLT +4 ZANS2 NOT EQUAL TO oS252¢ 
1€7002 TST ANS3 :DID ZERO GET STORED? 
eit es : BRANCH iF 5K 
HL Toy :ANS3 NOT EQUAL TO ZERC 
LEE7T74 TST ANS4 :DID ZERO. cg ORED? 
gE +4 : BRANCH 
HL Tos sANS4 NOT F Bua TO ZEF 
4 FEEPRESSERASESSLSSELSSEESESESELELELSARESAA ASHE ASH PAS RATA IS eTASEPESe tet +e 
:TEST 102: TEST STCFD (STORE-CONVERT FLOATING TC DOUBLE: 
: STORE 125252, 125252 --)> 125252 
. FPS = 047410, AC = ACR OST = M2-R7 
! PSPPEPSESSASESERESSEDEESESESSSEEEESESERSSESESAESSEESES ESE ES ESSER SESE 
SCOPE 
BR TS7102 
Lzes2s2 DATIOg: 125252, 125252 
OM74 17 TST:02: LOFPS 8047417 :LOAD FLOATING POINT STaUS 
L777E L DATIO2, ac3 LOAD lee ,25252 INTO ACI 
STCFD ACS, | .Feie :STORE-CONVERT ACR IN NEXT LOCATION 
aOR Oe: a ; “LOCATION OF ANSWER 


er est iL -DCFPI-8 TES’ OF LOCOF LOCFO, STCFD, STCOF MACYI1 27(732) 17-SEP-76 i0:46 PAGE S4 
OCFPT.P TEST SECTION 


012046 900900 HALT 
‘ie me & 
‘dc fad ‘ 
Sees bie res 177760 66716 MOV pe BBte are 
Bi 16767 177754 i671 MOV 
12074 018767 177750 lbb7!2 MOV Rpm 02+, ane 7 
512102 170200 STFPS ;STORE FLOATING POINT STATUS 
Siei04 922700 o47410 CMP i FPS =CHECK FLOATING POINT STATUS 
Siz119 90146) BE +4 : BRANCH IF Ok 
Sizllz 00 HL PS NOT EQUAL TO O474i0 
D12114 922767 125252 166660 CMP 8125252, ANS! :DID 125252 GET STORED” 
Slelee 51401 8&9 +4 RANCH IF OK 
51sie4 104004 eT +4 ANSI NOT EQUAL TO LeS25z2 
012126 e277 ocoosoe 1s6é50 ome e402, eNS2 ;DID "BR. +e" GET STORED? 
C12134 001401 BEG +4 “BRANCH IF 
212136 104004 HLT +4 :ANS2 NO ESUAL TO "BR . 
012140 905767 16sé42 TS? aNS3 :DID ZERO GET STORED? 
Sigi#4 901401 8&9 +4 : BRANCH I K 
Slei4s 104004 HLT +4 :ANS3 NOT EQUAL TO ZERO 
012150 OOS7E7 166636 TST ANS sDID ZERO. cer STORED? 
512:54 301431 REQ +4 : BRANCH 
Bre:s& 1540os HLT +4 ANS Not ESUAL TO ZERO 
bbabab hahah 4 -talaladaadada -Sababteh-b-SSabntaldnb-dnbnhal inbigd fbn tal tal b-ball thal tal tal inlaid 
TEST 103: TEST STCFD (STORE-CONVERT FLOATING TO DOUSLE) 
: STORE — 040125, 052525 --> 040125, 052525 09060 ooesso 
: Pee = 0474 uo, ° AC = Ace, OST = Ma-k 
SRE a RD a OT: SR EL REE, a8 
CiZ160 104400 SCOPE 
Sizlg2 o0o4d2 a5 TST103 
CLZ164 O40125 eSes25 DATIOS: 040125, 0S2S525 
912179 170127 047417 TST103: LOFPS 8047417 ;LOAD FLOATING POINT STALS 
C!2174 172657 177764 LOF DATIO3, AC2 *LOAD 040125.052525 INTO Ac2 
912200 176237 90109¢ STCFD AC2,  aBANS! ;STORE- ACe IN ANS] THRL SNS+ 
512204 170200 StFPS CFE :STORE FLOATING POINT STATUS 
b12206 CY7HDC C #047400. FPS -CHECK FLOATING POINT STATUS 
Sleele OOl4t1 BES es :BRANCH IF OK . 
6izs!4 iO4e i. :FPS NOT EQUAL TO O47400 
CLZE16 022767 O4C12S 1EESte ome 8040125, ANS! :D1D 040125 GET STORED’ 
Sigee4 90140} | : BRANCH HIF OK 
tlee2e 10404 HL +4 :ANS1 NOT EQUAL TC O40125 
12230 22767 OS2525 Leese cM s0S2525,ANS2 ;:DIC g525e5 oe STORED” 
eigese C140: BEG +4 ;BRANCH IF 
vieete 6108904 HLT sANS2 NOT EabAL TO OS2525 
TLEESZ DDETET leetec TS? ANS3 sOID ZERO SEY STORED” 


“MRINDE TS LL-OCEEI HB “ES. oF SQcOF. LOCKED, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 AGE 55° 
CSF ET EL TEST SECTION 

Cize“6 301401 BEQ +4 sBRANCH IF OK 

Ciz2eSoO 104004 HLT+4 sANS3S NOT EQUAL TO ZERO 

Sre2S2e OOS7E> 16éSs=z TST ANS4 :DID ZERO GET STORED’ 

C1225 OClIscl Bf3 +4 ;BRANCH IF OK 

cizzso. LONDON HLT +4 -ANS4 NOT EQUAL TO ZERO 


sSSPSRESSSSSSSSFSLSSSALAE RSE LS SLAEAFLSLSHSSLESSLS LE SSSLSSESS LAFF SSA 4444444 


-TEST 104: TEST STCFD (STORE-CONVERT FLOATING TO COUBLE: 
; STORE 193253, 125252 =-) 140252, 125252 ecgode , 2600ce 
Fes = 947415, AC = AC3, Ost = me-8? 
REED SEDERESESESESDESEDESESEESSESSESSESESERSSSSREEE SESS ESSE DES ESS ES EDS 
512262 304800 SCOPE 
312264 oO0403 = TSTi04 
Ci2266 140252 125252 DATION: 140252, 125252 
Cleeve O0160e ADRIOS: ANS! 
o12274 170127 o47417 "S7104: LOFES 8047417 :LOAD FLOATING POINT STAUS 
812300 172767 1777 LOF DATION, aca :LOAG 140262, 125252 INTO AC3 
012304 176277 i77?b= StcFD «0 AC3, ° ~SADRIOY :STORE-CONVERT ACS IN ANS! THRU ANSS 
512319 17920 STees FBS STORE FLOATING POINT STATUS 
Cleaslie Gez700 47419 C 8057410, FPS :CHECK FLOATING POINT STATUS 
Steals OO1401 BEG +4 :BRANCH IF OK 
O:232e0 1 HLT :FPS NOT EQUAL TO O4 
12322 022767 140252 1bs+S2 OMe 8140252, ANS: :DID 140252 GET STORED” 
Ci2ss0 901401 5&0 +4 "BRANCH IF OK 
Biazse ro4e0d4 HLT+4 SANSL NOT EQUAL TO 140252 
C12334 022767 125252 ibe+42 cM #125252, ANS2  =- ss DID lesese GET STORED” 
Fiez4e OC140: 353 ; : BRANCH 
Sizes §iosc0s hes) :ANS2 NOT Fe auAL TO 128252 
12246 OOS7E7 166424 TST ANS3 DID ZERC cg STORED? 
Siesse 901491 EC +4 'SRANCH IF OK 
Sresé4 jo64c04 HLT +4 :ANS3 NOT EQUAL TO ZERO 
QLE25— OS7E7 1ee+ze TST ANSS :DID ZERO GET STORED? 
vigsee U0140i BEG +4 :BRANCH IF OK 
Fiezes §=Liso8s HLT +4 “ANS4 NOT EQUAL TO ZERO 


5 FEFEPEEEFSESESSELFLALSSHELSERESLAFLSFAFERERARELHALARALRFAARAATERF AAFP SF LE+ 


:TEST 105: TEST STCOF (STORE-CONVERT OCUBLE TO FLOATING) 
: ET ORE PPr0se, 039000, 000000,008000 --> 000000, 009000 
: FPS = 047604, AC = ACC, DST = “MB=R> 


: PEPEPPSEESEESAEESEREEESPSSSERSSSSPSPAPEDERESEESESED ERTS SEES EEO SS EEE EEES 


MRINOEC <2 1-DCFPI “8 TES’ OF LOCOF, LOCFD, STCFD, STCDOF MACY11 27(732) 17-SEP-76 i0:46 PAGE SE 


SCFET. PL) TEST SECTION 
912 gyg OPE 
ei3388 eats 3 TST105 
912372 900000 900000 o00000 DATICS: 000000, 000000, 900000, conooD 
Biesoc ooo00c 
212402 179127 O47 gd TST10S: LDEPS 4047617 ite OAD F OATING POINT STAUS 
sisal bebe? ees RANEY cL ; 
S38 iseces ioaaes FPI10S: EIFOF ACQN ANS:  —=_— 
- é oe : ! . on all =i 
StEise {58080 aTFRE FSR ee a co the a3, 
8420 700 47604 MP #047604, FPS : CHECK Fi ORT ING POINT 57 tATu 
Bi T4d1 es H TF 0 
012436 104000 HLT Bee NNOT EQUAL TO o47604 
512440 767 900000 166234 CMP #000000 ,ANS: :210 900000 4 GET STORED” 
Fros46 490140: BEQ +4 
» Ole4so 104004 Hi T+4 BNE) NO? EQUAL To cococs 
o1e4Se 922767 occ0dd 186324 CMP eCOO000,aNS2 § ;:O%D OGO000 GET STORED? 
512460 O01491 BE9 +4 “BRANCH IF OK 
dle4ge HL T+ :ANS2 NOT EQUAL 70 COCIOC 
012464 OOS7E7 1b621é TS? ANS2 DID 7 ERO se STORED? 
Bie470 OO1401 BES +4 : BRANT 
B1e472 104004 Hi T+4 “ANS NOT ESUAL TO ZERO 
D12474 OOS7E7 166210 TST ANS4 DID ZERO. cg STORED? 
d1es09 6140: BQ 0 ot :BRENCH 
Biesce 1o4054 HLT +4 ZANS4 NO eat IAL TO ZERO 
Se ee eee eee eeT CTCF CETORE-CONVERT DOUBLE TO FLOATING 
:TEST 106: TEST STCDF (STORE-CONVERT DOUSLE To 
: STORE Bee5e8, oSese5 OS3c36 dSes25 --> opzse8, Reseze 
: FPS = 047600, = Acd, OST = MB-R 
S AGeeEEOSTAEOSEESESESSESSESESSSESEOSESSEES4ECR SD 0EsREREE00 ERI ESEE88 
012504 104400 SCOPE 
Si2éd6 aScsis BR TST10& 
O12510 OS2eS25 oOSes2e5 oOS2525 DATIOS: OS2525, 0SeS25, 052525, 952525 
6ie5i6 o5e525 
012520 170127 047617 TST106: LOFPS #047617 ;LOAD FLOATING POINT STAUS 
Siese4 B0S067 lees CLR ANS3 CLEAR BN NS3 
512530 00507 166254 écR ANS4 CLEAR ANSY eee: cfnm 
Sie534 172467 177750 LOO DAT 106, ac9 LORD ose525 os2525, 052525.5 952525 INTO acl 
bieS54G 176067 16b236 FPIi0b: STCDF ACO, ‘1 :5T0 NVERT A ANSL. ANS 
Cie544 170290 STEPS SORE “EO ORFING "SINT STATUS 
Fies4e 022700 o47E00 Mp 207600, FPS :CHECK FLOATING POINT STATUS 
Freese OC1401 BEG :BRANCK IF OK 
Si2es4 64000 HLT “FPS NOT EQUAL TO O47EDO 
SLESSS DE27E7? DESEEE itezle ome e0S2525,ANS! ;DID OS2525 GET STORED’ 
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912564 9091401 BE +4 sBRANCH IF OK 
ss 154084 ae ANS | “Hof FSU AL To oSeses 
21257 922767 os2s25 166206 cup wOS2525 , ANSE :DID 9525 GET STORED” 
siseee SGdas Ht+4 zBRENCH Not EsuAL To os2s25 
C12602 O0S76? 166200 TST ANS3 :D10 ZERO GET STORED? 
Br2s0e 901461 BEQ +4 F OK 

Biséid 104004 HLT +4 ene NOT EQUAL TO ZERG 
C12612 O0S767 166172 TST ANS4 :DID ZERO GET STORED? 
512616 9914C) 3EQ +4 :BRANCH IF Ok 

b1e620 104004 HLT +4 :ANS4Y NO? EQUAL TO ZERO 


‘reer inv. TEST STCDF (STORELCONVERT DOUBLE TO DATING) 


:TEST 107 1s COF ¢ TORE =CONVERT DOUBLE TQ FLOATING) 
: SORE oud dgest ie ese Se, leS28e, leSe$¢ - ==) leseSe, 125252 
EE. BA. RE” Ate. Se 
O12622 104400 SCOPE 
Sies24 Gooso4 5f TST107 
12626 125252 125252 125252 DATIO?: 125252, 125252, 126262, 125252 
012634 125252 
012636 170127 047617 TST197: LDOFPS #047617 sLOAD FLOATING POINT STAUS 
Ole642 005067 166140 CLR ANS3 -CLEAR ANS3 
912646 005087 16136 L ANS a :CLEAR ANSY its Tb iho 
5i26S2 172667 177750 LOO OAT107, ACE :LOAD 125252 Lesese 125262. 1 125252 INT? acz 
DiDeee 176267 166120 FPr107: STCDF Ce, ANS! :STORE-CONVERT AGe IN A $1, ANSE 
Nleb62 170200 STFPS . :STORE FLOATING MSS INT eTattis 
812664 022700 O47610 CMe 8047610, FPS :CHECK FLOATING POINT STATUS 
012670 001401 BEG +4 :BRANCH IF OK 
Si2672 104000 HLT :FPS NOT EQUAL TO 047610 
912674 22767 125252 166100 CMP 8125252, ANS! :DID wi oSee S GET STORED? 
Sle702 901401 BEG +4 : BRANC 
512704 104 HLT +4 | !ANS1 NOT EQUAL TO 125252 
0127068 O22767 125253 166079 OMP Bi2s252,ANS2  ; DID i 25253 GET STORED? 
5ie7i4 O014e: 9 +4 :BRANCH IF OK 
Cle71s 104004 HL T+4 :ANS2 NOT EQUAL TO 125252 
012720 OOS7E7 166062 TST ANS3 :DID ZERO GET STORED? 
52724 O6140: BEG +4 :BRANCH IF OK 
212726 104004 Hi T+4 :ANSS NOT EGUAL TO ZER? 
512720 OOS7E7 16t05+ TST ANS . i210 ZERO Ger STORED” 
Bis7a4 AClHs! gE9 +4 :BRANCH IF 
Fle7se 104004 HL +4 :ANS4 NOT EQUAL TO ZERC 


SESE FALSESEFSLSFSELELESFILILELLSLESRERSIRESSRELRSARFERERSFALSASRELASPL ASSET 


3 1-DOFPS-B ER, oF aR LDOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE SE 


~3 P33" tee 


pire! "Phone __ ObGe06, Sboob, 866060, 360008 > oogebb. adoss 
 sennneae Sees eeu Gases hesevens tale eae cesersessesessoseesees 


212740 104400 SCOPE 
Biev4e 300404 BR TST110 
o12744 900200 000000 of0000 DAT110: 000200,000009, 900000. so0D00 
Sie7se 900009 
512754 170127 047617 TSTL10: LOFPS #047617 i080, FLOBTING POINT STaU 
512760 O95067 166Dee CLR ANS3 °C ANS3 
Bie764 505067 1660ec CLR ANS4 ister ANSY 
012770 172667 177750 LDD DATIi0, ace i080 oo02c0 909990 goo00c,.oesgge ints acz 
012774 176267 166002 FPILIC: 51 :0F BCE. ANS! ge a ee Be ce is BAS!) ANSE 
1 a8 TES qj 
ica iz0eee 047600 >me #047600, FPS arING paint erat 
013006 901401 BE9 +4 
013010 104000 HLT ‘eRe NNOT FOAL TO 947600 
0132012 Oe2767 oo020c 1ss7Ee CMP W0C0200, ANS! :DID 000200 GET STORED” 
012020 901401 BEG “BRANCH IF OK 
613022 104004 HLT +4 :ANS1 NOT EQUAL TO CcOC2D0 
013024 922767 op0ceC 1ES7S2 MP sCOCOCO.ANS2 §§ ;DID OO00000 GET STORED? 
013032 901401 BEG +4 :BRANCH IF OK 
013034 104004 | Hi Tos ZANS2 NOT EQUAL TO cOcooC 
013036 OOS77 165744 TST ANS3 :O20 ZERO, GET STORED? 
523042 O0l+0i BEG +4 : BRAN iK 
623044 104054 HLT +4 : ANS3 Not EGUAL TO ZERO 
D1Z046 OOS767 1g873¢ TST ANS! :DID ZERO GET STORED? 
13052 801401 BEG +4 : BRANCH 
Bi3365 154064 HLT +4 :ANS4 NOT EQUAL TO ZERO 
ee rare teat rates eer eee eee 
“TEST 111: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING: 
: STORE i 305200, Sgpa08 900000. 000909 my 108208. “scacac 
4 PR BK os EA EL 2. RS 
C120S& 108400 SCOPE 
613060 S00404 BR TSTLL! 
512062 100290 o0f099 905000 DATL11!: 100200, 000000. cc0099. 990000 
0132970 oc06e90 
912072 170127 947617 TST1i1: LDFPS  #O476i7 +080 FLOATING POINT STaAUS 
S13076 OOSCE7 1&S794 Cor @NS3 :CLEAR ANS 
Fizloe 905067 16&7S2 ‘ CCR ANS4 CLEAR ANS4 
CLz10e 172767 177755 L5o DATL1, AC3 :LOAD 100200,c00000, 050000. c00°02 INT? 4c3 
-T2lle 17E2E7 LESeeS FPIJ1i: STCOF ACS, | ANSI STORE-CONVERT Acs tN ANS!. ANSe 
Fisile 170200 STFES = OFPS -STORE FLOATING POINT STavUS 


ono ooo 


Ooo WOO too 


L-OCFPI-8 TES] OcOF LOCFD, STCFD, STCOF MACYL1 27(732) 17-SEP-76 10:46 SAGE SS 
T aa 


IO OOO OOOOWOIVODAIOINONO OOM OID 


13120 22700 o47610 CMP 8047610, FPS ; CHECK FLORT ING POINT STATUS 
t3ie4 OO1401 BEQ +4 CH I 
t3i26 104000 HLT TEpS NOT FOUAL TO O47610 
13130 922767 190200 1eS644 CMP #100200, ANS! :DID 100200 GET STORED? 
13136 09140: BEG +4 “BRANCH IF 
12140 104c04 HLT +4 :ANS1 NOT EOUAL TO 100260 
13142 022767 o00000 165634 CMP #000000,ANS2  ;DID ooD000 GET STORED? 
13155 901401 SEO +4 : BRANCH 
12152 104004 HL T+4 :ANS2 NO EOuAL To ooocec 
12154 OOS7E7 165626 TST ANS3 :DID ZERO GET STORED? 
13169 991491 BEG +4 “BRANCH IF OK 
12162 104004 HLT +4 :ANS3 Not EQUAL TO ZERO 
13164 OOS7E7 165620 TST ANS ;DID ZERO GET STORED? 
13170 OCi40! BEQ +4 : BRANCH 
igi7e 104004 HLT+4 TANSY NOT EQUAL TO ZERO 
erat tise Tee? STO (aTORELCONVERT DOUBLE To FLOATING; 
:TEST 112: TEST STCDF (STORE- CONVERT DOUBLE TO FLOAT 
: STORE 900177, 177777, 177777. 177777 ==) 909006, stist 
FPS = 047604, © AC = ACI, DST = M&-87 
 sencanate ears el besa ace lbeurnen easter Ceenseneraneecerereres 
13174 1o4400 SCOPE 
13176 ana BR TsT112 
13200 000177 177777 177777 DATi12: 000177,177777, 177777, 177777 
13206 177777 
13210 170127 900200 TST112: LDFPS #000200 -SETD ONLY 
13214 OOSOE7 IESSEE CLR ANS3 -CLEAR ANS3 
13220 905067 16SSe4 CLR ANS4 : CLEAR ANS 
13224 172567 177750 L5D DATI12, ACL LOAD 000177,177777,177777, 177777 INTO ACL 
13230 170127 047617 LOFPS = #04761? LOAD FLOATING POIN? STAUS 
13234 176167 iess4e STCDF ACL, ANS ;STORE-CONVERT AC] IN ANS}, ANS2 
13040 170000 STFPS FP :STORE FLOATING POINT STATUS 
13042 622700 o47E04 CMP 8047604, FPS : CHECK yFLORTING POINT Status 
13246 001401 BES +4 :BRANCH IF 
13250 104000 HLT EPS NOT EQUAL 7 0 O47604 
13252 O0S767 165524 TST NS} :CHECK ANS! 
13256 001401 EEG +4 “BRANCH IF OK 
13260 104004 ALT+4 :ANS! NOT EGUAL TOE 
13262 005767 e551 TST ANS2 : CHECK aNS2 
j 001491 BEG +4 :ERANCH IF OK 
13270 194004 HLT +4 : ANS2 Not EQUAL TO F 
005767 165510 TST ANS3 :DID ZERO GET STORED? 
Coles! BEG +4 "BRANCH IF OK 
1o4084 HLT +4 sANSS NOT EQUAL TO TERS 


MAINE: -11-DOFP2-8 


ale 3) 
-—s.+*« 


a 


213308 
313398 


ata 
Ww 
+ 
@ 


Oooo Oooo 
= 


233420 


005767 


Teedss 


1o44o0 
650465 


001401 
104004 


005767 
601401 
104004 


005767 
901401 


* yO4004 


104490 
OCO4D4 
ys0009 

ANRAAS 


Stated 
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165502 


165430 
047600 


C40009 


ocooso 


165372 


165364 


TST —ANSH ;DID ZERO GET STORED? 
BEQ +4 BRANCH IF OK 
HLT +4 SANS4 NOT EQUAL TO ZERO 
5 ERRESEEEA EASELS RELA LALLA EREA ALAS HAALA SELLE ELALALS LSS SLSS SEAS FA EATS 
:TEST 113: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING) 
STORE — 040000,000000,000000,000000 --> oY¥0000, acccc0 
FPS = 047600, ' AC = AC3 OST = Mb-R7 
SAE AEEEE DEE AEESEESEEESSEAESSSBEAEEESEAEEAESSE SSS ESEEEEER SEES SES EEESE08 
SCOPE 
ee TST113 


999096 DAT113: 940000, 000000, c0000C, S000c0 


TSTi13: LDFPS #047617 :,080 FLOBTING POINT STAUS 
CLR ANS3 :CLEAR ANS3 
CLR ANS4 CLEAR _ANSY 
LOD DATI13, AC3 ‘SRD 040000, o00g00, oog0cd, CodCcS INTC ACE 
FPI113: STCDF AC3, | ANS!  :STORE-CONVERT AC3 IN ANSI. ANSe 
STFPS FPS :STORE FLOATING POINT STATUS 
CMP #047600, FPS :CHECK FLOATING POINT STATUS 
REQ +4 :BRANCH IF OK 
HLT “FPS NOT EQUAL TO 047690 
165410 CMP #040090, ANS! ;DID 040000 Get STORED’ 
BEG +4 :BRANCH IF 
HLT +4 :ANS1 NOT EQUAL To o4#oco2 
1£5400 CMP s0OCOCO,ANS2 =; DID 900000, GET STORED? 
BEO +4 : BRANCH 
HLT+4 : ANS2 Noy EQUAL 7 0 o000C0 
TST ANS3 :DID ZERO cer STORED? 
BEG +4 : BRANCH IF 
HLT +4 :ANS3 NOT EQUAL TO ZERO 
TST ANSH :DID ZERO Er STORED? 
BEG +4 : BRAN CH IF 
HiT +4 ANSY NOT EQUAL TO ZERO 
pesnecqusseceeseeses atrar tite CeeeeT Rm Th FLAT) 
“TEST 114: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING) 
; STORE 140000, 099000 100000,0d9000 --> 149000, 900091 
: FPS = 047610, = ACI OST = Mb-R 
 sssesenstoueconsesbuenoconsesesasasuasenscosesesssqsonnssensueseanpie 
SCOPE 
BR TST1L14 


100805 OAT114: 140006,000000, 100090, 009000 


wee TEST OF LOCDF, LOCFD, STCFD, STCOF MACY11 27(732) 17-SEP-76 10:46 PAGE $1 
DCFP TEST SECTION 


C13444 170127 047617 TST114: LOFPS aad tot FLOATING POINT STAUS 
013450 005067 165332 CLR NS3 ANS3 


bia Poaees peeteh cbf ae, AC] CER, abedo 900000 ett we INTC ACL 


O13464 176167 165312 FPI114: STCDF AC1, ° ANS! :ST ORE-CONVERT AC it 
013470 179200 STFPS FPS’ : STORE SPORTING. SOINT STATUS 
012472 047610 CMP #047610, FPS s CHECK F OATING POINT STATUS 
513408 maith BE +4 i BRANC 
61350 HL PS NOT EQUAL TO 047610 
013502 oe2767 140000 165272 CMP #140000, ANSI i010 140000 GET STORED? 
913510 001401 BEQ +4 : BRAN 
513812 HLT+4 :ANS1 NOT EQUAL TO 140000 
013514 022767 oO0001 165262 CMP s009001,ANS2 ;DID 000001 GET STORED? 
013522 001401 BEQ +4 : BRANCH 
013524 104004 HLT +4 !ANS2 NOT EQUAL TO oo0o0! 
013526 005767 165254 TST ANS3 :DID ZERO cer STORED? 
013532 001401 BEG +4 : BRANCH 
013534 104004 HLT +4 :ANS3 NOT EQUAL TO ZERO 
013536 O0S767 165246 TST ANS :DID ZERO GET STORED? 
013542 O01401 EQ +4 BRANCH IF OK 
o:3544 104004 HLT +4 :ANSY NOT EGUAL TO ZERO 
5 ERAEFLAEALALELEERELALELELFA ATLASES LALEFLL LALA SALE RA FLELFLHTELA LSS SFLLFE 
; TEST 115: TEST STCDF (STORE- CONVERT DOUBLE TC FLOATING) 
: STORE obeege 177777 077777, 177777 = mah 177777, 177777 
FE os Bk EE RE A 2 SER en 
012546 104400 SCOPE 
813550 ooo404 BR TST115 
013552 177777 177777 077777 DATL1S: 177777,177777, 077777, 177777 
013565 177777 
013562 170127 047617 TST115: LDFPS #047617 ;LOAD FLOATING POINT STAUS 
013566 005067 165214 éLR FNS3 “CLEAR ANS3 
913572 05067 165ele éLR ANS :CLEAR ANSY 
013576 172567 177760 LOD DAT11S, ACL ‘LOAD 177777 177777 .077777,.177777 INTO ACL 
012602 176167 165174 FPILIS: STCDF ACI, ° ANS TE foc ebnkt Stati 
013606 170200 TFPS =F PS STOR FLOATING POINT STATU 
0:36!0 Oe2700 o47610 CMP #047610, FPS : CHECK FLOATING POINT STATUS 
013614 O0140! BEG +4 :BRANCH IF 
613616 104000 HLT FPS NOT EQUAL TO O47B10 
613620 022767 177777 165154 CMP #177777. ANS! i010 177777 GET STORED? 
=i 3be6 301401 BEO +4 RANCH IF Ok 
5136 $c04 HLT +4 :ANS1 NOT EQUAL TO 177777 
Ol363e 022767 177777 IE5144 CMP #177777, ANS2 DID 17777? | Ger STORES? 
Siz640 001401 BEG +4 -BRANCH IF 6 
ArZe4> «194004 HL T+4 tENS2 NO? EQUAL TO 17?TT? 
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1 TEST SECTION 

Tee ath 165136 eH — ‘BRR ZERO GET STORED? 
+ 

Biaeee TBades are nes Hof eduiaL TO ZERO 

013654 005767 i65130 TST ANSY DORN ZERO 5a, STORED? 

Bi 3660 alae BEG +4 By 

Ul 194004 HLT +4 Su NO EQUAL TO ZERO 


eee er iter eet ea hee 
; TEST "i dn 7 ize a aaage OUBLE 10 Ab Boacae 
; is } ¢” 17777 a a oco000 


FEA = he 116 
eee iawn eS re 
4 104400 SCOPE 


o 


0136 

013666 000404 BR TSTL1E 

013670 177777 177777 «177777 ~=DATI16: 177777, 177777, 177777, 177777 

013676 177777 

01 170127 047617 TST116: LDOFPS #047617 ;LOAD FLOATING POINT STAUS 
0137 7 165076 CLR ANS3 ;CLEAR ANS3 

013710 7 165074 CLR ANSY ;CLEAR ANSY 

013714 172567 177750 LDD DAT116, ACI ;LOAD_ 177777, 177777 ,177777,177777 INTO AC! 
013720 176167 165056 FPI116: STCDF ACl, ANS1 ;STORE-CONVERT ACI {N ANS!’ ANS2 
013724 170200 STFPS FPS :STORE FLOATING POINT STATUS 
013726 170367 165070 STST FEC sat ORs EXCEPTION CODES 

01373e 022700 147616 CMP #147616,FPS ;CHECK FLOATING POINT STATUS 
013736 001401 BES +4 ;BRANCH IF 

013740 104000 HLT ;FPS NOT EQUAL TO 147616 
013742 022767 000010 165052 CMP #i0, FEC ;CHECK FLOATING EXCEPTION CODE 
013750 001401 BES +4 ; BRAN CH_IF OK 

0137Se 104000 HLT ;FEC NOT EQUAL TO id 

013754 022767 013720 165042 CMP wFPI116, FEA ;CHECK FLOATING EXCEPTION ADDRESS 
013762 001401 BEQ +4 ;BRANCH IF OK 

013764 104000 HLT ;FEA NOT EQUAL TO FPI1L6 
013766 022767 100000 165006 CMP #100000, ANS! ;DID 100000 GET STORED? 

013774 001401 BEG 4 ;BRANCH IF OK 

013778 104004 HLT+4 ;ANS1 NOT EQUAL TO 100000 
014000 022767 OO0000 164776 CMP #000000, ANS2 ;DID poonge ger STORED? 

014006 901401 BEQ +4 : BRANCH 

014010 104004 HLT+4 :ANS2 NOT. EQUAL TQ 000900 
014012 OO0S767 164770 TST ANS3 :D1D ZERO. ar STORED? 

014016 001401 BEQ +4 ; BRANCH 

014020 104004 HLT+4 ;ANS3 NOT. EQUAL TO ZERO 

014022 O0S7E7 it476e TST ANS4 ;DID ZERO GET STORED’ 

Ol40e& O014C1 BES +4 BRANCH IF Ok 
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DCFPI.P TEST SECTION 


014030 104004 HLT+4 ;ANS4 NOT EQUAL TO ZERO 


j PRRSEOERRAROROR EDO EF RED EOME REDE EOR TAS RESE RESTO RODS RASS RETRPHRREROREDS 
; TEST 117: TEST _STCOF 08 oT oo 1907 — TQ FLOAT ba 
; TORE . bob. Bee Mey eld > 1 Opgo0s, , 000000 


acl, TR RIB, ST hE te ites 


014032 104400 SCOPE 
014034 o00404 BR TST117 
014036 077777 177777. 177777. DAT117: 077777,177777, 177777, 177777 
014044 177777 
01404 170127 047617 TST117: LDFPS #047617 - ; LOAD FLOATING POINT STAUS 
140S2 O0S067 184730 CLR aN NS3 CL LEAR ANS3 
14056 67 164726 CLR ANS CLEAR NS 4 
014062 172667 177750 LOD DAT117, Ace LOAD 077777, 177777, 177777, 177777 INTO ACZ 
O14066 176267 164710 FPI117: STCDF AC2, ° ANSI PORE CONVERT ace th ANSI’ ANS2 
014072 170200 STFPS FPS’ :STORE FLOATING POINT STATUS 
014074 170367 164722 STStT FEC :STORE EXCEPTION COD 
014100 022700 147606 CMP #147608, FPS *CHECK FL OATING POINT STATUS 
014104 OO1401 BEQ +4 : BRANCH 
014106 104000 HLT FPS NOT EQUAL TO 147606 
014110 022767 OO0010 164704 CMP #i0, FEC ;CHECK FLOATING EXCEPTION CODE 
014116 OO1401 BEG +4 :BRANCH IF OK 
014120 104000 HLT :FEC NOT EQUAL TO 10 
014122 022767 O14Ob6 164674 CMP #FPI117, FEA | ;CHECK FLOATING EXCEPTION ADDRESS 
014130 O01401 BEQ +4 : BRANCH 
014132 104000 HLT *FEA NOT EQUAL TO FPI117 
014134 022767 O00000 164640 CMP #000000,ANS1 § ;DID OOOO00 GET STORED? 
014142 01401 BEG +4 : BRANCH 
014144 104004 HLT+4 “ANSI NOT EQUAL TO OcO000 
O14146 022767 OO0000 164630 CMP #O00000,ANS2 § ;DID oo0000 GET STORED? 
014154 001401 BEG +4 : BRANCH 
014156 104004 HLT+4 *ANS2 NOT EQUAL To ooooce . 
O14160 005767 164622 TST ANS3 DID ZERO. GET STORED? 
014164 001401 BEG +4 : BRANCH 
014166 104004 HLT+4 :ANS3 Hor EQUAL TO ZERO 
014170 OOS7E7 164614 TST ANSY ;DID ZERO. Ger STORED? 
614174 Oo140! BEQ +4 : BRANCH 
C1417& 104004 HLT+4 :ANSY NOT EQUAL TO ZERO 
5 KEELE EFLELAREEEELRLFLRERELELE RE RELL ERALLE RE LALA LEELA LRRALERAAEAALALERER 
‘TEST 120: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING} 
: STORE  O40eS2, 125252, 1eS26e, LeSe5e --) o4Ge52, 125253 
: FPS = 047600, AC = ACO, OST = MO-AC3 


eo ee ene ee ee ES Se ee ee ee 


OCFPY. 


01 
014264 


014266 
014274 
014276 


014310 
014314 
014316 


014320 
014322 


014324 
014332 


014362 


MAINDEC = Bi OCFPI-8 


104004 


104400 
000404 


052525 
OSeSeS 


170127 
005 


170200 


-_— mm ee ee wn cee ee 6 + se ee 
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TEST SECTI 


5 RHRERALEA REAL LAL LL EARL ALLER LALA REALL RAAALAELEL SRA LA SALA AA ELELSSLAL ES LSS 


SCOPE 
BR TST120 
125252 125252 DATI2e0: O402S2, 1eSeS2, 125252, 12eSeS2 


047617 TST1Z0: LOFPS #047617 L000. FLOATING POINT STAUS 
164562 CLR ANS3 CL LEAR aNS3 
ey Cb BAT i20 ACO 1 S252, 125252 INTO ACD 
STCOF ACO, ° AC3 Ree mPa Ag3°Re 
STFPS TING POINT oS 
047600 CMP #047600, FPS Beck FLOATING POINT STATUS 
BEQ +4 ANCH IF OK 
HLT FPS NOT EQUAL TO 047600 
164S26 STD ANS!  ;STORE AC3_IN ANSI, ANS2 
O40252 164520 CHF abibese, ANS1 ;D1 D Sudese GET STORED? 
HLT+4 ANSI NOT EQUAL TO O402S2 
125253 164510 CMP #125253,ANS2 ;DID 125253 GET STORED? 
BEQ +4 : BRANCH 
HLT+4 :ANS2 NOT EQUAL TO 125253 
164502 TST ANS3 ;DID ZERO GET STORED? 
BEQ +4 : BRANCH 
HLT+4 *ANS3 NOT EQUAL TO ZERO 
164474 TST ANS DID ZERO Ger STORED? 
BEQ +4 ‘BRANCH IF 
HLT+4 ANSY NOT EQUAL TO ZERO 
5 LEERERERALALLRERERALLLLE LRRERERE LALA LARA RE EERE LLL LAL EL RE RE LALLA TALE RALEE 
‘TEST 121: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING) 
; STORE gbe525, 052525, 052525,052525 --) 05525, 0S2525 
PS = 047600, ' AC = DST = MI-R 
OR a DE TO, = ci 
SCOPE 
BR TST121 


OSeSeS 052525 DATI21: 052525, 052eSeS, 0SeSe5, OSeS25 
; \#0S2Se5 , 0S2S525, 052525, 052525 


047617 TST121: LOFPS #047617 ;LOAD FLOATING POINT STAUS 
164442 CLR ANSS :CLEAR ANS3 
164440 CLR ANS “CLEAR ANSY =) 
177750 LOD DAT121, ACO ‘LOAD 052525, 052525, 052525,052525 INTO Aco 
001002 MOV #ANSI, RY 

STCOF RCO, (RY) ;STORE-CONVERT ACO IN ANSI, ANS2 

STFPS FPS’ :STORE FLOATING POINT STATUS 


ae 


am a ee - ee 


014370 
01437e 


014374 
014400 
014402 


014450 
014452 


014454 
014462 


014534 
014S42 
C14s44 


005767 
001401 
104004 


104400 
000404 


125252 
leS2Se 


170127 
pee 


Oe 
001401 


104000 


022767 
001401 
104004 


TEST OF 


DCDF, LOCFD, STCFD, STCDF 


TEST SECTION 


04760 


001002 


0S2SeS 


0S2S25 


164352 


164344 


l2eS25e 


047617 


047610 


001006 


125252 


164370 


164360 


12eS2eSe2 


164<4C 
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CMP #047600,FPS ERENG FLOATING POINT STATUS 
Q +4 RANCH 


BE OK 

HLT *FPS NOT EQUAL TO 047600 

CMP #ANSI, RY 4 KRY 

BR +4 ANCH IF OK 

HLT 4 NOT EQUAL TO #ANS1 

CHP #052525, ANS] 21 D 052525 ott STORED? 

HLT+4 ANG oot Eau EQUAL TO OS2S25 

CMP #0S2525,ANS2 § ;DID OS2525 GET STORED? 

BEQ +4 ;BRANCH IF OK 

HLT +4 *ANS2 NOT EQUAL TO OS2S25 

TST ANS3 sDID ZERO GET STORED? 

BEQ +4 BRANCH IF OK 

HL T+4 :ANS3 NOT EQUAL TO ZERO 

TST ANSY ;DID ZERO GET STORED? 

BEQ +4 :BRANCH I 

HL T+4 :ANS4 NOT EQUAL TO ZERO 
5 EERE RLEE LARA ERE LEE AA ERE R AREAL EA EE EEE ERLE EA ESE RE RE RE LE ELE REEL ALLA EEELE EE 
:TEST 122: TEST STCDF (STORE-CONVERT DOUBLE TO FLOATING) 


STORE leSeSe, leSeSe, leSese, leSese --? ~ | 125253 
FPS = 047610 AC = RC3 OST 


 seucusececenacasseriennererenirbeenauscssassesiesssenanaeseneeeeaeeeett 


DAT 122: 


TSTlee: 


SCOPE 
BR TST122 


125252, 125252, 12eSeSe, leSeS2 


LOFPS #8047617 ;LOAD FLOATING POINT STAUS 
CLR ANS3 a NS3 


CLR ANSY : CLEAR ANSY 
LOD DAT 122, aca ‘LOAD 125252, 125252, 125252, 125252 INTO AC3 
STCDF AC3, ' (R1)+  ;STORE-CONVERT AC3 IN ANSI, ANS2 

STEPS FPS :STORE FLOATING POINT STATUS 

CMP #047610, FPS “CHECK FLOATING POINT STATUS 

BEG +4 CH IF OK 

HLT FPS NOT EQUAL TO 047610 

CMP #ANS2, R1 :CHECK R1 

BEG +4 ‘BRANCH IF OK 

HLT :R1 NOT EQUAL TO #ANS3 

CMP #125252, ANS] :D1D Lesese GET STORED? 

BEG +4 ‘BRANCH IF OK 

HL T+4 “ANS 1 Not EQUAL TO 125252 
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EINES -}1-D0FFI-8 TEST OF LOX 

5cFPT.83! TES? SECTION 
S144 C2277 125253 164230 “MP = g12S253,ANS2 —-: DID 3 GET STORED? 
Bidecy 58 fue: BEQ eC p28 te OK 
Bi455— 104004 HLT +4 ZANS2 NOT EQUAL TO 126252 
014560 OOSTE? E4222 "ST ANS RO GET STORED? 
= 14864 sigh sane Beo iwo Branch IF tex 
514566 104004 HL T+4 :ANS3 eguAL TO ZERO 
214875 DOSTE? E4214 TST —ANSY T STORED? 
si3es5  SRPC8: : | a B10 ee oe 
Sis TOsoo4 HLT +4 : ANS NOT EQUAL TO ZERO 


ee er rarer ateee river nemerete peuseentaegeneueersuennananaas 
TEST 123: TEST STCOF (STORE-CONVERT DOUBLE TC FLOATING) 
; STORE Os ane eee OSeSes, Oe n=) 109128, ,0S2SeS 


F ST 
 nepitinnatonatsedstlonsatarsnttbedsnesebtaansotoataveeneendinceneunines 


O14600 104400 _ SCOPE 

O146d2 d00405 eS TS7123 

D14604 140125 OS2525 OS2525 DATI23: 140125, S225, oSaSes, oS2S25 

Bidele ese5e 

14614 001002 ADR123: ANS! 

014616 170127 047617 TST123: LDEPS 8047617 ORD FLOATING POINT STAU 

014622 005067 164160 CLR ANS3 

014626 005067 164156 ccR ANS ‘ETB AR ANS4 

014632 012705 914614 MOV 8A0R123, RS iL J 
514636 172667 177742 LOD -DATI23, ACE LOAD. 140125, 52625, 0 Os2525,052525 INTO cz 
Di4642 176235 STCDF Ace, ° a(RSi+ ANS? 
014644 170200 STFPS 6 FPS OT ORE TING cs i Crats 
O1464— 922709 047610 CMP 8047610, FPS s CHECK FLOATING POINT STATUS 
O14sse 001401 BE 9 +4 

14654 104 HLT Fes NOT EQUAL TD O47610 

014656 Ol461€ OMe aTST123, RS ;CHECK RS 

Sivés2 90140] BEG +4 BRANCH IF Ok 

Si4se4 104000 HLT RS NOT EQUAL TO e8TST123 

o1' 767 140125 E4106 oMP #140125, ANS! :DID J 140}25 GET STORED” 

Si4e 1401 BEG +4 R 

i467 104004 HLT+4 :ANS 1 Not EQUAL TO 140125 

OL4700 O22767 cses25 1e407¢ CMP eOS2525,ANSZ DID 952625 GET STORED* 

924706 001401 5EQ +4 : BRANCH 

Sis7io id4c04 HLT +4 TANS2 Nor EQUAL TO OS2Szs 

CL4712 OOS7E7 1e4070 TST ANS ‘O10 ZERO GET STORED” 

SI47i€ 001401 BEG +4 : BRANC 

Pi7ed 6[o4c04 HL T+4 SANS2 NOT EQUAL TO ZERC 

O14722 OOS7E7 ie4ce2 TST ANS :DID ZERO GET STORED" 

Si4726 50140: 2FG +4 : BRANCH IF 6 


eie730 T5435 nutes fings NO? ESUAL TD ZERS 
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S SSSSSERERSSSELLSLSALSSRSESSSSSSSASSSSSRELHSSSSSSLSSAL+SESS4SS 54494944444 


Te ee PSE 
Al 0S ' 


i 


SCOPE 
BR TST124 


Bist3s 000404 
C14736 «040125 OS2525 052525 DATION: 040125, 052525, 0Se5e5, 052525 
Bis744 O52505 
C1474% 170127 O47617 TST124: LDFPS #8047617 ;LOAD FLOATING POINT STAUS 
614752 OOSOG7 164030 CLR ANS3 :CLEBR ANS3 
51475 005067 184026 CLR ANS AR ANSS 
bis7ée Ol2703 001906 MOV R3 He 
514766 172567 177744 DD paTl24, Aci :LOAD O40125, 052525 OS2S25 052525 ints a7 
014772 176343 STCOF 1, | -(83)  :STORE-CONVERT AC1 IN ANSI. ANSe 
014774 1702 STEPS :STORE FLOATING POINT STATUS 
314778 be2700 047600 ¢ 8047600, FPS : : CHECK FLOATING POINT STATUS 
5iép05 fbadba rf Eps NOT EQUAL TO O47EOd 
215006 022703 oc1o02 ome BANSI, RS :CHECK R3 
O15012 601401 SEO +4 :BRANCH IF OK 
515014 194000 HLT :R3 NOT EouaL TO SANS! 
QISOL6 022767 O40125 163756 cme s040125,ANS!  ;DID 040125 GET STORED’ 
515004 o9i501 SEG +4 :BRANCH IF OK 
O1s026 10 HLT+4 : ANS 1 NOT EQUAL TO 940125 
215030 7 OS2525 163746 OMe s0S2525,ANS2 :DID gs2525 GET STORED? 
C15026 O0140: BEG +4 : BRANCH 
Dis04¢ 104004 HLT +4 : ANS2 Not EQUAL TO OSes25 
Q1S042 O0S7E7 163740 TST ANS3 DID 0 ZERO. T STORED? 
Sid04e 90140: BEG + : BRANC 
615055 104004 HLT +4 :ONS3 NOT EQUAL TO ZERO 
S150S2 OOS7E7 163732 TST ANSS :01D ZERO GET STORED? 
*15056 80:40) BEG +4 ‘BRANCH IF OK 
Sis0eo yoscts HLT +4 “ANSY NOT EQUAL TO ZERO 
eee teeter et CTCOR (STORELCONVERT DOUBLE Ta FloatiNG, 
:TEST 125: TEST STCDF (STORE-CONVERT DOUBLE 70 FLOATING) 
: STORE 140253, lesese 125252, 125252 --) 14288, 126253 
:; FPS = O47610, | AC = ACO DST = MS-R 
PaO TOR ngs. EER A, (EE 
SIS062 JOM400 COPE 
Freres Foca BR TST125 
TISOE «ISDBSE LESSEE L2S2S2 OATLZS: 140252, LeSeSz2, 125252, 125252 
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OCF ET. 81; TEST SECTION 

15074 12Sz$2 

Sisc7é 001002 ADR125: ANS! 

3:51:00 1701e? O47617 TST125: LOFPS 8047617 ;LOAD FLOATING POINT STA''S 

Sisi04 05067 163676 cLR ANS CLEAR ANS3 

Si5110 005067 163674 CLR == ANS CLEAR ANS4 

Si5119 O12e704 015200 MOV aTST125, RY ron a4 

PiSieO 170467 177742 LOD. = DAT125, ACO agese, esese lesese, 125252 INTS ACS 

R252 58500 Steps «fess SINT Status 

575130 BSSSOR owreic CMP 8047610, FPS ad one POINT Status 

SiS138 901401 BEQ +4 

Sii36 194000 HLT ‘Pb e NOT EQUAL TO D47EI2 

015180 022704 15076 ome BADR 25, FH CHECK RY 

B15144 O014C: BEG , :BRANCH IF 

Sisise 1d400c HLT :R4 NOT EbuAL To sAcei25 

015150 022767 i402S2 163624 oMP B140252,ANS1  ;DID 140252 GET STORED” 

15156 001401 BEG +4 TBRANCH IF OK 

Sisié0 154004 HLT +4 TANS] NOT EGUAL TO 140252 

CiSib2 922767 125252 163614 C Bi2S252,ANS2 ;DID 125253 GET STORED? 

Oi5:70 90140: BE > = IBRANCH IF _OK 

Sisi72 O40 HL To TANS2 NOT EQUAL TO 125253 

O15174 OOS7E7 163606 TST ANS 01D ZEX) GET STORED? 

015200 90149: BE 3 4 BRANCH IF Ok 

Sid202 io4o04 HLT +4 SANS3 NOT EQUAL TO ZERO 

215204 OOS7S7 163600 TST ANS 01D ZERO GET STORED” 

Sréeio S014: BES i BRANCH IF OK 

Sig2i2 154004 HL Tos SANSY NOT EGUAL TO ZERC 
{SPPSERERRERESESRSLESSSPSESLESEAAPRFSESHLSLATASSASEAAA LIF IPeS tse es ess94 
STEST 126: _ TEST STCOF (STORE-CONVERT DOUBLE TO FLOATING 
; SfORE peeses. OpgSes  Dheses. oSes23 ~~) OSe5e5, oSe5e5 
EE TR os 2 32... Ee 

C1Sei4 194400 COPE 

Fideis oO0404 ze TST126 

C1S220 oSe525 oses2s OS2S25 OATIZS: OS2S2S, 052525, oS2Se5, oS2S25 

5is226 OS2525 

015220 170127 O47E17 TSTL2E: LDFPS 8047617 08D FLORTING POINT STALE 

515234 005067 iezste CLR =Ss«NS SCLEAR ANS3 

ide4o O050e7 163544 rR NSS ; CLEAR niet 

315244 012704 O01z24 MOV BANS1+222,R4 ;LOAD R 

i250 172567 177744 Boo (DaTIet Ati = ; LOAD As2s2s, OS2S25, 0S2526,052625 iNT? ac: 

=} B6?4 176164 17786 STCOF Bol. =222(F4) STORE CONVERT ACL tN ANS: . ANSS 

Biéebo 170200 StFPS FP STORE FLOATING POINT STATUS 

Sif2ee Oez700 c47ENC ZMe 8047605, FPS CHECK FLOATING POINT STATUS 

PLEzee «35142! BES +4 TBRANCH IF Ok 


PAINE: -LI-OCFPI-8 


SCFP?. 
wt? '_* . 


rue. 
ws 


o-b +8 < 


vio www 


i 


G Bee 8 


’ 
inuwi 
GJ 


+ 
rT 


ono mo0o0o ooo 
= b-+ b— 


Ww 
£ 
£ 


o-*db-- 


c& 


416 


Pe Sey Se ee ee ord wed ned ed wed ed ed ed ee ed 
AUN CUNO CONTUNUUnUnUninnununiin anda rat 


1 OOO OOOOoHOOVOOOOYI OOF WOM 


Pe tric +s 


i04490 
oo0405 


125252 
12eS2Se 


5 2701 
1401 
104060 
pee7e? 
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TEST SECTION 


i&S445 


l2eS2Se 


047617 


047610 


O1S416 


163472 


lé34be2 


HLT sFPS NOT EGU! TO 947600 
CMP BANS 14222, 24 ;CHECK R4 

BEG .*4 eet IF OK 

HLT - 4 NOT EQUAL TO #ANS1+222 
CMP s0S2Se5 ,,ANS1 ‘o10 OS2S2S GET STORED’ 
SE9 +4 : BRAN CH I 

HLT+4 : ANS 1 NOT EQUAL TO OS2eS25 
CMP a0S2eSes5 ,ANS2 iD D OS2 >, eet STORED? 
BE +4 BRANCH 

iT +4 ‘ANS NOT EQUAL TO OS2S25 
TST ANS3 ;OID ZERO yb STORED? 

BEG +4 : BRAN CH 

HLT +4 :ANS3 NOT EQUAL TO ZERO 
TST ANS4 :DID ZERO. GET STORED? 

BEG +4 : BRANCH 

HLT +4 : ANS Nor EQUAL TO ZERO 


, ELEFSEAELSESLAAELELAFLE SLA SLASLAFLERSLELASSSL A TTAALEFRESSLELF ASSL ELA AF4 


TEST 127: TEST STCOF (STORE-CONVERT DOUBLE 10 FLOATING) 

; STORE  leSeSe, leSeSe, leSeSe, leSes2 --» leSese, leSeS3 
FPS = O47610 AC = He DST = M7-R1 

| suaasnnsnbonebsassbhanneausensahoadunebnoontesnesannsnsqnennsenscesess 
SCOPE 
BR TSTle7 


DAT127: 12SeSe, 1252Se, 125252, 125252 


QADR127: ANS! 


TSTi27: LOFPS #8047617 ORO FL FLOATING POINT STAUS 
CLR ANS3 ANS3 


¢LR ANS :CLEAR ANSY ests 
LOD ba 7127 sLOAD 125252, 125252, 125252, 125252 IN7D Ac 
MOV ADR! bo 45K Rl :LOAD R 

STCDF Reo ee 6(R1)  :STORE-CONVERT AC2 IN ANSL, ANS2 

STFPS FPS :STORE FLOATING POINT STATUS 

CMP #047610, FPS : CHECK FLORTING POINT STATUS 

BEG +4 :BRANCH IF OK 

HLT :FPS NOT EQUAL TO O47E10 

CMP BADR127+26,R1 CHECK RI 

SE +4 :BRANCH IF Ok 

HLT “RI NOT EQUAL TO sADRL27+26 

CMP #125252,ANS! :DID 1252 2. SE STORED? 

95 44 : BRANCH | 

HLT +4 : ANS | NOT ESUAL To 125252 


CMP sleSeS2, ANSe 3010 125253 GET STORED’ 


NDES<11-DoFF 7-8 TEST OF LOCOF, LOCFD, STCFD, STCOF MACYI1 27(732) 17-SEP-76 10:46 PAGE 70 
Pll TEST SECTION 
o1s4 40 BE +4 sBRANCH IF OK 
eiBipe rier O84 Eee !ANSe NOT EQUAL TO 125252 
O15462 005767 163320 TS? ANS3 ‘pte ZERO GET STORED? 
bias pei BEQ +4 ; BRANCH K 
Eis470 «194004 HLT +4 "ANS3 NOT EQUAL TO ZERO 
orsu72 OOSTE7 163212 TST ANS :DID ZERO GET STORED? 
Srs47— 901401 BEG +4 : H 
Biéso05 704004 HLT +4 :ANSY NOT EQUAL TO ZERO 
ee a tae chee ates ee Re th hee 
TEST 130: TEST STCOF (STORE-CONVERT DOUBLE 70 FLOATING 
; STORE _ 140328, 1Sese5 952525, O52528 - ==> 149125 
Fes = 047610, = AC3 DST = Me-R7 
 siehiaaienlonedantnataseezuendtbenbimeiiaanstanesnebenesehanians 
o1sSo2 104400 SCOPE 
515504 oo0404 BR TST130 
O15506 140125 iS2eS2e€ oS2525 DATIZO: 140125, 152526, 0S2526, os2s25 
815514 OSe525 
015516 170127 O476i7 TST120: LOFPS 8047617 sLOAD FLOATING POINT STAUS 
615522 7 163260 CLR ANS3 :CLEAR ANS3 
915525 005067 163256 CLR ANS4 :CLEAR ANSY 
015532 172767 177750 LOD DAT136, AC3 *LOAD 140125 152525 2525. O5255 INTS 403 
015536 176327 STCOF aAc2, (PC)+  :STORE-CONVERT ACS IN NEXT LOCAT 
015540 o00090 apk130: 6 -LOCATION FOR ansice 
515542 900402 BR 4+ 
0:5544 900006 HALT -PC CATCHER 
015546 000000 HALT 
015550 016767 177764 163224 MOV ADR!30, ANS! 
C15556 O16767 177760 l63e20 MOV ADR 13042, ANS2 
95 4 Oi 767 177754 163214 MoV eae BNS3 
15572 616767 177750 l€3210 MOV A R130+6'ANSS 
015605 170200 STFPS :STORE FLOATING POINT STATUS 
515602 022700 o47610 CMP pe7b 10. FPS : CHECK uipPs ING POINT STATUS 
515606 0140! 8E9 +4 : BRANCH 
o15610 104008 HLT ‘FPS NOT EQUAL TO O47E!9 
o1S6le Oe2767 140125 162162 oP #i40125,ANS:  ;DID 140125 GET STORED? 
§16629 oofso1 BE9 +4 : BRANCH 
6istee 104004 HLT +4 :ANSL NOT EQUAL TO 140125 
C1S624 gee767 COONDe 163152 cmp #402,  ANS2 D "BR +6" GET STORED? 
sizes? BESLEY ' Seo iw se Race 8, SET ST 
C15634 ip4o04 Hi To4 : ANS2 Noy EQUAL TO F"BR . +6" 
JiS636 COS7E7 162144 TST ANS3 :DID ZERO GET STORED? 
Fidese O01401 BEG +4 BRANCH | 
Eizews 104004 HiT +4 : ANS3 “NOT EQUAL TO ZER3 
CLESHE 905767 16236 TST BNSS :DID ZERO GET STORED? 
f:56f2 D614) BES +5 “BRANCH IF OK 


“SN 
aT 


SEED L-DCPI-8 
orses4 104004 


Ooo oo 
+o +p er b~b-5< 


CACO CrVCrrary 


Cm ooo 
a 


et ee 


eww om 


Beee8e 


154004 
022767 
007491 
104004 


yt 
0100e 


047600 


O40:25 163044 


wore ce +2225 
JSEVES 1S IUI4 
lé3d2é 

. = 
163020 

PS (reeeaa 
leE2eSe l2c2Se 
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HLT+4 ;ANS4 NOT EQUAL TO ZERO 
 RSEREREEEESESELEP LES EEESSEERESE SERRE REALE ELE EES SESE SESE SEES SS 9495545444 
;TEST i31: TEST _STCOF (STORE-CONVERT DOUBLE TO FLOATING) 

: STORE — 040125, 052525, OSes, nes, OSeSee = on) omic ,OSeS25 
: FPS = 047600, AC = OST = M3-R 


I EE os A: A. 3. ee 


SCOPE 
BR TST131 
OATIZ1: 040125, 0S2S2eS, 0S2SeS , 0SeS2 


TS7T131: LDFPS #8047617 LOAD FLOATING POINT STALS 
CLR a $3 sc ERR AN Naa 
CLR ANS4 ae AR A 
LOO DATI31, AC] ;LOAD O04 125 tat OS2SeS, 052525 INTo 4c: 
STCDOF AC1, | SBANS! ;STORE-CONVERT ACI IN AN BNET ANE 
STFPS FPS : STORE FLOATING *SAINt STAT IS 
CMP #047600 FPS : CHECK re POINT STATUS 
BE9 +4 : BRA NCH _IF OK 
HiT :FPS NOT EQUAL TO 047600 
cmp 8040125, ANSI sBiD guoies GET STORED” 
SEG +4 ANCH K 
HLT+4 BNE! NOT EQUAL TO O40125 
CMP #052525, ,ANS2 3010 OSeSeS GET STORED’ 
BES .+4 : BRAN CH IF OK 
ALT +4 :ANSe NOT EQUAL To OS2s25 
TST BNS3 ;01D ZERO ar STORED” 
BEG +4 : BRANCH IF 
HLT +4 ;ANSS NOt EdUAL TO ZERC 
TS’ ANS4 ;OID ZERO GET STORED? 
BEG +4 BRANCH t K 
HLT +4 ;ANSY NOT EQUAL TO ZERO 
a ia. Wat tio tite teat mae eh 
:TEST 132: TEST STCOF (STORE-CONVERT DOUBLE TO FLOATING: 
; STORE 140253, iggese leSeSe,1 lesese --) 146253. 1262 s3 
: FPS = o47610, | AC = ACe OST = M7-87 
; AenunEeeuReSedeeseahunescouansebeeneneeeseneeceesencesessecnenescescnes 
SCOPE 
BR TSTi32 
DATIi32: 140252, 125252, 125252, 25252 


ver1%2 + - AuI7L > ee ee ee =e: = 
= . +] , - - 
1312S: FES e497 el: cw Pom ait det = MoS 


e- 


ICI ICICI IED — oh 


) 
ST ae : 
Cre wo 


ae 


4 
La 
«> 
a 
wD 
o@ 

' 
w 


pp2062 


194900 


022767 
001491 
104004 


005767 
001401 
104004 


00577 


> 4 ee] 


06 
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pet ;CLEAR ANS3 


ANS4 :CLEAR ANSY 
Daq132, ace :LOAD 140252, 125252, 125252, 12525 
Ace, ° SAORIZ2 ;STORE-CONVERT ACe IN ANSI, ANS2 
:STORE FLOATING POINT STATUS 
#057610, FPS CHECK FLO FLOATING POINT STATUS 


RANCH IF OK 

:FPS NOT EQUAL TO 047610 
#140252, ANS! :DID 140852 GET STORED? 
+4 : BRANC H IF 

: ANS 1 Not EQUAL TO 140252 
#125253, ANSE i210 1eses3 GET STORED” 
° :ANS2 NOT EQUAL TO 125252 
aNs3 :OID ZERO GET STORED? 


:BRANCH IF 5k 
;ANS3 NOT EQUAL TO ZERC 


- 
~~ 
= 


ANS4 :010 ZERO GET STORED” 
;25 : SRANCH IF OK 
SGNS4 NO IT EQUAL TC ZERC 
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ocFey 63) L AND SCOPE 


o1gi14 104400 DONE: SCOPE 

cib1i6 03e737 002090 177570 BIT #SH110, 34SHR :RING THE BELL’ 

RIE} RPaaPS gop207 oo1e4e2 ANE Fan TYPE NO he A BELL 

tat a 18 ve Tie sCLEAR TRACE TRAP 

feat poses 010000 177872 © gt eSW12, J8SiR RUN WITH ,! 

5igisc 901010 BNE $ 

Beis Bier lee oi 

516160 716 oo0dz0 BIS #20, (6) -SET TRACE TRAP 

SiSieN bie74e OO LOse2 NOV #BECIN, -(6) “JUMP TO START OF TEST 
Oe 2$: MOV BEGIN. -(6) -JUMP TO START OF TEST 

pibice Biecae posses MOY gaa RO iad MONITOR ADDRESS 

918202 001404 BEQ 3s IF Ni 

916204 004710 JSR 7, (0) -G0 70 MONITOR 

vem ie 

4 

5igele 00040 NOP 

016214 oo00d02 3S: RTI Bog 

016216 YESRT: RTI :RETURN TO PROGRAM FROM TRAP 

916220 032737 OO04OD 177570 .EMT: BIT #SWO8, IsSwR SKILL LDUB OR LOOP ON SPEC. TEST 

Sige26 01404 BEQ 1 

016230 123767 177570 is2s4e2 CMPB so J#SWR, ICNT ON RIGHT TEST?  #Sw7-O# 

016236 001437 BEQ OVER 

SibeH0 113703 177570 13: Ove aeSWR,R3 :GET UB BITS 

5 PSue 4209 040000 177570 BIT #SW14, aeSWR sLOOP ON TEST 

018254 O26 BNE KIT ‘ 

516256 37 oo4o0e 177570 BIT #SW11,a8SWR SKILL ITERATIONS 

018264 O010le BNE SAVLAD 

016266 105767 162507 TSTB = ICNT #1 7 

Oige72 001404 BEG 2 ;BRANCH IF FIRST 

916274 126767 OO1106 162477 CMPB IMES,ICNT+1  :DONE? 

616302 001013 BNE KIT :BRANCH IF NOT 

616304 112767 000001 is24e7 25: MOVB #1, ICNT+1 FURS ITERATION 

Bese tee eee es ne ee ee 

Bipzee 16737 1e24S2 177570 MOV ICNt aaDISPLAY : arse AY TEST NO. ANC ITERATION COUNT 

016330 900 TI : RETURN 

01633 7 162443 KIT; INCB  ICNT#1 

ESSE ,0es8? 162436 177570 OVER: MOV ICNT,SWDISPLAY ;SET UP DISPLAY 

O16344 905767 001032 TST LAD “FIRST ONE? 

S:6350 001769 BEG SAVLAD ; » 

Sigss2 OMs71e 001024 MOY LAD, (6) ;FUDGE RETURN ADDRESS 

C1e3se od0co02 RT] SFIXES PS 
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cFPI.P HLT ROUTINE (ERROR TYPEOUT) 


nub BBE 002000 177570 .TRP: Bil #GH10, d8SHR BELL ON ERROR? 


5 


016370 012767 o00207 901000 MOV SBELL,. TYPE : TYPE A BELL 
916376 OO00004 017376 TYPE . TYP 
i64pe 767 OO0406 13: JSR c. ERROR :COUNT THE NUMBER OF ERRORS 
5164 O446 MOV 
016410 032737 o20000 177570 BIT acll13. JeSuR :SKIP TYPEOUT IF SET 
Bes GEO pura ee Perum 
! 
RiEYSo =ROPPGE Baaadd move RES URM, :PUT ADDRESS OF INSTRUCTION 2N STACK 
164 62716 o00002 SUB #2, (6) 
164 I MOV (6) TTY sTYPE (6) IN OCTAL 
164 4767 000212 ISR %7 .PRINTR :TYPE LEADING ZERO’S 
OlbuNe 000004 0173S TYPE ,SPAce+3 ne . na 
Bt “ pAooes 000200 JSR Oot TR FPA Nees sPho's 
016454 o00004 017352 TYPE  ,SPACE+4 
916460 012703 001002 MOV #ANS1,R3 :ADDRESS OF DATA 
O16464 113604 MOVB @(6)+,R4 “AMOUNT OF DATA IN TABLE 
018466 001426 BEQ 3$ 
916470 100016 BPL 2s : TYPE STACK? 
O16472 O16867 OOO00E 162302 MOV 6(6), ANSI 
016500 016667 000010 162276 MOV 10(63 ,ANS2 
O1S506 O16667 O00012 ibee72 MOV 12(6) ;ANS3 
016514 016667 O00014 62266 MOV 14(6) /ANSH 
016522 042704 177600 BIC #177600, R4 sCLEAR SIGN 
016526 900004 917353 2$: TYPE SPACE +4 
016532 012305 MOV 138 TTY -TYPE (2)4 IN OCTA 
016534 004767 000114 JSR “7, PAINTR :TYPE LEADING Senet = 
01 005304 DEC RY 
O16542 001371 BNE 2$ 
016544 005700 33: TST FPS 
016546 100016 BPL US 
016550 000004 017347 TYPE SPACE 
016554 170367 162242 ststT fF 
16560 5705 ibee36 MOV FEC TTY : TYP FEC IN OcTAL 
16564 76 064 JSR ¥%? PRINTR : TYPE LEADING ZERO'S 
016570 OO 017352 TYPE SPACE+3 
916574 016705 162224 MOV FEA TTY : TYPE FEA IN OCTAL 
016600 004767 O000Sc . ISR %7 . PRINTR : TYPE LEADING ZERO'S 
016604 012604 4S: MOV (65+. RY 
016606 005737 177570 TST assur sHALT ON ERROR 
Ol66le 100001 BPL +4 :SKIP IF CONTINUE 
916614 000000 HALT HALT ON 
016616 032737 O01000 177570 BIT #SWO9, J#SWR “CHECK FOR tNHTBIT LOOP ON ERROR 
016624 01001 BNE +4 :SKIP IF LOOP ON ERROR 
5ig626 o000 RTI 
016620 10€067 162145 CLRB —sCICNT#1 
016634 032737 GO04C0 177570 BIT sSWO8, J#SWR ;CHECK FOR LOAD MICROBREAK 
Cigé42 001233 BNE KIT ‘BRANCH IF NOT 
Sis644 113703 177570 MOVE a@BSWR,R3 "PUT MICROBREAK ADDRESS IN 83 
516650 170093 Sus :LOAD MICROBREAK 
tiseSe S00627 BR KIT “LOOP ON TEST UNTIL NO ERRORS 


| MAINDEC-11-DCFPI-8 
OCFPI.PLI 


112767 


000207 


He OF LOCOF, Pan's STCFD, STCDF 
oc WORD 


AL DUMP OF’A 
000001 000130 PRINTR: < t 


PeeaSS ooors PRINTS: Kove 


017002 MOV 


i$: CLRB 


es: ROL 


ooces4 INCB 
o0coso TSTB 


pobos? Ne 
BNE 
017082 ce 


ooc060 MOVB 
017062 TYPE 


3s: . BLKW 
AYS: 0 


000364 ERROR: INC 
009991 000041 ITB 


000019 o00346 CMP 
CO0o4e MOV 
o00C4e CLR 

1$: RTS 


ag nt 


1$ 
#33,R4 
+5" 
#9, (4)+ 
3, ps 
PC 
4 
ERRORS 
rt 
#10, ERRORS 


adete, RO 
1$ 


ate 
PC, (0) 
PC 
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;SET ZERO FILL SWITCH 


oe ZERO’S 


arr PO NTER TO _— ASCII CHAR. 
LEAR FIRST BYT 
‘tare. a! 
CLEAR B OF CHARACTER 
RoTaTe INTO C 
:ROTATE or INTO C 
; PACK 
: ROTATE TaI7 INTO C 
;PACK IT 
;CHECK FILL SWITCH 
;MAKE INTO ASCII CHAR 


: REPEAT 
sTYPE IT 
*RESTORE RY 


ie ERRORS 
UTO MODE? 


+700 MANY? 


;NOT YET 
GET ADDRESS 
sPORGE | IT IF ZERO 


:CALL THE MONITOR 
RETURN 


17-SEP-76 10:46 PAGE 75 


2-0 ee OQ apee-o-aee = 
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DCFPI.P1] POWER DOWN AND UP ROUTINES 


017056 012777 017252 000306 POWDWN: MOV SILLUP,QUPVEC ;SET FOR FAST UP 


917064 012777 00340 000302 MOV #340,QUPVEC+2  ;PRIO:7 
17072 17 TFPS =(6) GET THE FPS 
17074 17001 TD 
17076 174 D ACO, -(6) :SAVE AC’S 
617100 174146 STD ACL, -(6) 
017102 174246 STD AC2,-(6) 
picig 174346 sb ACS, -(6) 
171 o4 L acy’ 
017110 174046 STD ACO; -(6) 
Oi71lle 172405 LOD acs ,AC 
017114 STD Aco’ -(6) ; 
017116 46 MOV RO, (6) :SAVE REGISTERS 
017120 O10146 MOV R1,-(6) 
O17lee O MOV Re, -(6) 
017124 010346 MOV R3,-(6) 
Oi7ies MOV RY’ -(6) 
171 . MOV RS; -(6) 
017132 010667 o00220 MCV SP: SAVES :SAVE SP 
017136 012777 O17146 oo0226 MOV #POWUP, JUPVEC :SET UP VECTOR 
017144 nee HALT 
017146 016706 o00204 POWUP: MOV SAVE, SP :GET SP 
0171S2 ooso01 CLR R1 -WAIT LOOP FOR THE TTY 
017154 01 1$: INC Rl 
017156 001376 BNE 1$ 
017160 012605 MOV (5)+,R5 :GET THE REGISTERS 
017162 012604 MOV (6)+°R4 
017164 012603 MOV (6)+,R3 
017166 Ole602 MOV (6)+'Re 
0!7170 Oles01 MOV (6)+'RI 
017172 012600 MOV (6)+;RO 
017174 170011 SETD 
017176 172426 LOD (6)+.ACO :RESTORE THE AC'S 
017 174005 STD aco, ACS 
017202 172426 LDD (6)4+. ACO 
017204 174 STD aco,AcC4 
0i7206 172726 LOD (6)4+,AC3 
017210 1726 LOD (6)+,AC2 
172le 172526 Loo (6)+7 ACI 
17214 172426 COD (6)+'ACO 
017216 170126 LOFPS (6)+ ;RESTORE FPS 
017220 012777 017056 o00140 MOV #POWDWN, DDWNVEC ;SET UP THE POWER DOWN VECTOR 
017226 012777 090340 000134 MOV #240, IDWNVEC+2 
017234 900004 017240 TYPE ,.42 ;.ASCIZ <15><12>"POWER™ 
017250 0000 RTI 
o17eSe oo0000 ILLUP: HALT : THE POWER UP SEQUENCE WAS STARTED 
617254 000776 SR 2 : BEFORE THE POWER DOWN WAS COMPLETE 


oe ne ere = tee ee ee er ee we = = + - 


ee 


roe2 


ee 


bp be 
furu 
23 


INININING 
Re 
fe 


ONO000 O00 DBDOOOOVOHOOOO00000 


c00901 


TEST OF 
TYPE ROU 


000002 
000001 
000002 


000 
020012 


Tine. AND CATA 


STCFD, STCOF 
AREA 
.10T: MOV TTY, (6) 
MOV a2(6), TTY 
1S: TSTB 
BEQ 2g 
MOVB  (TTY)+,98177566 
TSTB = 8177564 
BPL - 
BR is 
2$: MOV a3(6) -(6) 
ADD (6) 
CMP (B54, 2(6) 
BNE 
ADD ie, Tr 
BIC #1’ TTY 
MOV TTY,2(6) 
38: MOV (6)+, TTY 
RTI 
RETURN: .ASCIZ <15><«12> 
SPACE: .ASCIZ <15><12>" 
EVEN 
SAVEE: O 
FPTADR: 172160 
FPVECT: 244. 246 
DWNVEC: 24,26 
UPVEC: 24° 26 
.TYPE: Q 
TRPB: O 
LAD: oO 
ERRORS: 0 
IMES: 377 
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save TTY 
T ADDRE ; TO BE TYPED 
: TERMINAT 


;LOAD AND TYPE THE CHARACTER 
31S THE PRINTER READY 


gE THE NEXT CHARACTER 
Oe 10, S_T0 TYPED 
AbD if ag ADDRESS 


iis | 
5ADD 2 TO_THE ADDRESS 

K UP TO AN EVEN BYTE 
RESTORE ae RESS 
;RESTORE T 
;RETURN AND LINEFEED 
RETURN AND 3 SPACES 


;FLOATING POINT ADDRESS ON ne Alved 
;FLOATING POINT VECTOR ADORE 

WER DOWN VECTOR ADDRESS 
‘POWER UP VECTOR ADDRESS 


; LOOP ADDRESS 
R_COUNT 
ITERATION COUNT 


' 
. i 
a a en ee a ee ee ee ee we 


MAINDEC-11-DCFPI-B 
CROSS REFERENCE TABLE -- USE 


DCFPI. 


aco 


aNSe 


Pll 
=%000000 


=*000001 


=”00000e 


=%090003 


0 
001002 


Ner004 


wwow 


TEST OF LOCDF, LOCFD 


STCFD, STCDF 
R Sympols 

>. F S68% nd 
irage 2100 Bais 
e742 ebe4* 2825S 
40S2 40S6* 4057 

S16 754% 760 
1260% 261% 1267 
2130% 2131 22.38% 
3303 3342% 3343 

603 bab 70e 
1409% 141 1571% 
1864 1941% 1947 
3067% 3068 106% 
4O8E* 

487 539% S4s 
lee3% 1e24* 1230 
2274% 2275 2456 
3146  3224% 3225 
1223 1260 1297 
4082 
2831 
2871 2872 2873 
3755 
3798 3799 3800. 
1112 
1990 

488 S1b* 517 

702e 703 731% 

905 934% 939 
1117s 1142* = =-1143 
1341% 1342 1378% 
1588 1624* 1625 
1828 1864* 1869 
2100 101 2131% 
2318 2349% 2355 
EEGS S76 2580 
2793 821 2835 
3068* 3074 3107% 
3309 3343* 3358 
3581 3621 3625 
3845 3873 3885 

Sel 550 579 

43 981 1015 
1383 1420 1463 
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632 
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657% 
F 


658% 


673 


“BINDES <1 1-D0F87- ies OF LOCDF, LOCFD, STCFD, STCOF MACYL1 27(732) 17-SEP-76 10:46 PAGE 80 

la DROSS REFERENCE TABLE '-- USER S 
i832 187 1915 956 1998 2032 2068 2105 2:1 177 
eseo 235 2395 31 e468 2504 2643 2684 2625 667 
evs?) 2839)—ts«CiS71# «602883. 2919s 1 «= «3000S 's«s«3039)—'s—«id3078~=Ssi3117 
3274 3213 3362 Cs 411s 451 3540 3585 3629 74 
3810 384 2889 a7 38 

ANSS 201006 4e7e §612390=—s«127~—SsidL'L 1380 1387 1424 1473 1810 1847 
1708 1749 «179H~—St's«*1839H—Csé“‘éB?2=~CO:«*S1S1Ss«d: 98K g0de 2036 e07¢ 
a. BE SE Be He ie i Be 
3082 4«6=s«104# »=3l2e1 4 93143 3160 3182 228 39 1# 
3340% 3366  3389% 3415 34378 3455S 3478s 05 3S228 3632 
3611 3 3 363 36 ‘ 3678 937008 3722 «4©093745* 3767 3789« 
33 f ¢ 

aNs+ 001019 48a 1243 1280 1317 1354 1331 1328 447? 1514 1551 
(a cu 
m be oe fe fe fe bo fe Be 

: 566 Sfbce S02 Stud. Sieg” Sf2h. S360 5383, 388 

3321 33418 3390 =3419 0 436* «4530 47S*@ 3504) = 3523 
%lo# 3637 3657# 3682 3701# 3726 3746 (377; 37908 360Cs 
3877# 3897 # 

ANSS  O01012 4299 2617 27078 

ANSE» 8=-sO014 4308 28738 

anes Soi pEe sabe 

ANg 017012 yOO4# 4O06# 4O07# 4fel# 4022 4025*# 40268 

Eat cates] “a wee 3913. 3915 

GI ] 331 

BELL = BoabaS 3808 3953 

DAT 001176 Sole 465 

DAT] 901224 4778 = 48] 

DATIO  Oce0Ss £928 

DATION O11S66 27788 27682 

DATIOl 011704 28198 2824 

DATIGe Ole0e4 oe6is e864 

DATIO3 O12164 29058 2908 

DATION Olepte oS4be D 

DATIOS Oles7e 29838 

DATINE O1eS10 30228 3028 

DATIO7 12626 30618 3067 

SaTil  o02144 721g 725 

DATIIC Ole744 21008 3106 

DATII1 613062 31398 63145 

per iig 013206 31788 3184 

DATI13 O13316 32188 3224 

CATIT4 13434 32578 3263 

OMTLIS 013552 3298 3302 

pariié 013676 333268 863342 

CAaTi17 O14036 33858 339: 

DATL2 902232 7508 

DATIZ0 O14204 24338 9 3439 

DATi2; 914324 34738 80 

SATice ClH4s4 351Be 3524 

Faviss 614634 2628 463570 

CeTies SlN73E 36078 3614 

Seties Sisoce 3eSie 3669 


o£ 
tw 


mon 
oh 
o 

a 


—7 Nie- “NIU 
3 oN 


Qube fae 


CI 


or SR 


“NO 


at 


}pinrues Wwwrrrm 
WO 
oO 
3 
bet 
Nate +e 
ae 


me fie 
2 #B 


fintoeaae 
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DCFPI. PLL CROSS REFERENCE TABLE'-- USER SymBdis 
DAT 126 9.5220 36%8 3703 
datier 515352 37408 49374? 
a nr es 
‘ ' ra rd 
Se Hee 
Bari33 1 38718 3678 
Davis 902436 138 823 
davis O0ess4 go79 ge 
Darié 5 889s = «85, 90: 
ATI? © OOe 9238 @©6- Se7 
Date 001312 sobs 42=s«dS10 
seed © 03056 978 963 
DST21  O02166 985e 1907 
DaTée 003265 19258 1031 
Oates 003370 1064e 1063 1078 
DaTe4 903502 11008 i193 
SATeé 003660 l1Sie 1165 
Sata? 003746 11908 1152 
Bat 001400 c3S8 S539 
DAT3O © OO4036 12208 1224 
OAT31 904136 10578 1261 
par ae DoveN? ise 1298 
346 taale 132 
DAT34  go44se 13688 1372 
DAT S04SSE 140Se 1409 
DAT36  OO¥BGE i44Se@ 1449 
DATs? 995030 i4Sle 1495 
ORTS —OO14BE Seue 40 s«S8 
DaT4O 005134 15288 1532 
TH} 15688 1572 
DATH2  O0541e2 16148 16168 
OATHS 005516 ig518 1655 
7 1692 vn 
DAT 005726 17268 1729 #737 
BATH? 174 18ie8 1812 
TS O01554 593 597 
AT lz 18548 1865 
DATSI  OO6426 189Se 1896 , 
SAT’ O06544 19378 1990 1948 - 
DAT 19788 1980 
PaTss 20548 2057 
OATSE 907176 20808 2091 
DATs? 997302 2le78 2130 
DAT. 001642 be28 2b 
CAT O07404 elsse 2166 
DAT61 907506 21998 2 
Catée 007610 22358 62238 
OATES 0077 le 22718 92274 
aTe4Y 019014 23078 2319 
Saves 10116 S3448 9 2347 
DATeE §8= 910220 22818 2284 
alg? 510322 e417" ©2420 
vet 001734 6538 86S 
SAT70 «OL OMe 24538 «= B45E 
Sat7i S1os2¢ 24808 2493 
UnT7e 910630 sSete 2523 
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UIs 
Soize Shin” S9c8e «SHET* S42, 54R8* 5182, S653" Shee 5G 
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i381 1385 1389 1393 «#41413 «#1418 i422 1426) 861430 1454 
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2215 «2219s eed) PHS?) S51 SS 259 8807 2283 
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3406 | 34903454398 )=S 35025063530 S34 0838 3542 
3579356238870 3891 co6 619 362303627) 3631) 3835 
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